Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re: how does these map statements work

by frozenwithjoy (Priest)
on Aug 06, 2014 at 08:56 UTC ( #1096403=note: print w/replies, xml ) Need Help??

in reply to how does these map statements work

Edit to include code from martin_100's question on sorting lines based on column 2 of a space-delimited file:

print map { $_->[1] } sort { $a->[0] <=> $b->[0] } map { [(split /\s+/)[1], $_] } read_file( $ARGV[0] );

Let's read the code in reverse order.

Read the file
read_file( $ARGV[0] );

Start by reading in the file line by line.

Convert each line into an anonymous array: [ 'column 2 text', 'full line of text']
map { [(split /\s+/)[1], $_] }

The lines are passed (as $_) to the 'first' map. $_ is implicitly passed to split /\s+/, which splits the line on spaces. (Note: the , $_ has nothing to do with the split!) Since it is wrapped in (...)[1], the split output is treated like a list in which the 2nd element is returned. This, itself, is inside [ ..., $_], which gives you an anonymous array containing the second element from the split ((split /\s+/)[1]) and the entire original line ($_).

Sort arrays based on first element of array (e.g., 'column 2 text')
sort { $a->[0] <=> $b->[0] }

These anonymous arrays are all passed along to the sort. Sort orders the arrays based on the first element of each anonymous array, hence the ->[0].

Pass second elements of sorted arrays (e.g., 'full line of text') to print statement
map { $_->[1] }

Now the sorted anonymous arrays containing both the second column of text and the entire line of text are passed to the 'second' map. This map passes only the second element of each array (the full original line) to the print statement, thereby printing the lines sorted based on the second column!

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1096403]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (3)
As of 2023-03-27 03:08 GMT
Find Nodes?
    Voting Booth?
    Which type of climate do you prefer to live in?

    Results (63 votes). Check out past polls.