in reply to sorting function arcument to 'sort': Can I pass additional parameters?
@list = sort { blah('whatever') } @list; sub blah { my $w = shift; return $a <=> $b; } [download]