Re^4: question about: my $a AND sort {$a <=> $b} keys %hash


good chemistry is complicated, and a little bit messy -LW
	PerlMonks

Re^4: question about: my $a AND sort {$a <=> $b} keys %hash

by AnomalousMonk (Archbishop)

on Aug 06, 2015 at 16:50 UTC ( [id://1137725]=note: print w/replies, xml )

Need Help??

in reply to Re^3: question about: my $a AND sort {$a <=> $b} keys %hash
in thread question about: my $a AND sort {$a <=> $b} keys %hash

Ah, that's interesting, because when I tried something similar, I had $a within the lexical scope of the comparison function definition, which of course did not work:

c:\@Work\Perl\monks>perl -wMstrict -lE
"use warnings;
 use strict;
 ;;
 my $a = 1;
 ;;
 sub numerically { $a <=> $b }
 ;;
 my @arr = sort qw( 1 2 10 21 11 12 );
 say qq{@arr};
 ;;
 @arr = sort numerically @arr;
 say qq{@arr};
"
1 10 11 12 2 21
1 2 11 21 10 12
[download]

I guess the take-away advice is that there should be a heavy application of Don't Do That™ whenever one contemplates creating lexical versions of special, non-punctuation variables.

Give a man a fish: <%-(-(-(-<