Map/sort help 1

[travs69]

I have an array like
@new ("1.1.1.1 stlmo #Web Server",
"1.1.1.2 atlga #Web Server",
"1.1.1.3 houtx #

http://WWW Server",

"1.1.1.4 stlmo #FTP Server",
"1.1.1.5 stlga #FTP Server",
"1.1.1.6 houtx #FTP Server");

I am trying to sort by the comments first then on the hostname. The code I was trying was

@new = map { $_->[0] } 
sort { $a->[3] cmp $b->[3] || $a->[2] cmp $b->[2]} 
map { [$_, (split /s+/),$_,3] } @new;

for (@new) { print "$_\n"; }

but (as I'm sure you know cause I'm posting here) it isn't working as expected.

 

[KevinADC]

the split argument is wrong: [red]s+[/red]
if you want to split on multiple "s" thats fine, but I think you wanted to split on spaces: [red]\s+[/red]

that should do it.



------------------------------------------
- Kevin, perl coder unexceptional!

 

[travs69]

Thanks Kevin.. I'll put my dunce hat on now

 

[KevinADC]

hehehe.... I'll lend you mine, it's pretty well worn out from me using it so much but your welcome to have it (keep it too, I need a new one).

------------------------------------------
- Kevin, perl coder unexceptional!