Select Code to Download

#! perl
use strict;
...
$string =~ s'\$'\$'g;

print $string, "\n";

23:12 >perl 1483_SoPW.pl
i am us\$ing moni\$ka expressi\$on

23:14 >