Select Code to Download

#!/usr/bin/perl
use warnings; 
...
    print "$escaped_wquotes";
    }
}

[casper@casperbox$ ./check_escapes /tmp/new_list
"bc\$stp
...
""\$foo\$foo\$
""\$foo\$baz
""foo\$bad\$

"bc\$stp"
"soc\$ny"
...
"\$foo\$foo\$"
"\$foo\$baz"
"foo\$bad\$"