Help for this page

Select Code to Download


  1. or download this
    my $trans2 = '\\' . $str . '\\';
print "$trans2\n";
$trans2 =~ y/a-zA-Z0-9"' .?!\-//cd;
printf $fmt, 'TRANS2', $trans2;
  2. or download this
    \*a%Z(5)-["'] <.?!>\
      TRANS2 : aZ5-"' .?!