Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"for (qw(a X b)) {
...
'a' -> 'a'
'X' -> 'a'
'b' -> 'b'

c:\@Work\Perl\monks>perl -wMstrict -le
"for (qw(a X b)) {
...
"
'a' -> 'a'
'b' -> 'b'