Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"my $emptystring = '\"\"';
...
 print '* match' if $emptystring =~ /^\"((?:[^^\"\\]|\\[\"\\])*)\"$/;
"
* match