Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"my $str = q{$line};
 print qq{'$str'};
"
'$line'

c:\@Work\Perl\monks>perl -wMstrict -le
"my $remove = qr{ now \s+ brown }xms;
...
)
<(?^:how  cow
)>