Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"my @arr = ('jack', 80, 'martin', 3, 'allan', 'george');
...
Argument "allan" isn't numeric in sort at -e line 1.
Argument "george" isn't numeric in sort at -e line 1.
jack martin allan george 3 80

c:\@Work\Perl\monks>perl -wMstrict -le
"my @ra = qw(foo 2bar 123baz quux999 x999x);
...
'123baz' == 123
'quux999' == 0
'x999x' == 0