note
Sweeper
Take this example from the Cookbook (page 120)
<pre>
print map { $_->[0] }
sort {
$a->[1] <=> $b->[1]
||
$a->[2] <=> $b->[2]
||
$a->[3] cmp $b->[3]
}
map { [ $_, (split /:/)[3, 2, 0] ] }
qx(cat /etc/passwd);
</pre>
How do you modularize a multi-criterion sort?
Of course, it can be done, but the resulting
module invocation would be more cumbersome
and less readable than an inline Schwartzian transform.
201822
201822