Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my $str = 'foo--bar';
...

A:  $1 'foo'  $2 'bar'
B:  $1 'foo'  $2 'bar'