Help for this page

Select Code to Download

Select or download this

#! perl
use strict;
...
}

print q{Final: }, $c, "\n";

Select or download this

17:37 >perl 1352_SoPW.pl
Original: asdfghjk
Final: asdf__g_h!h_!_jk

17:39 >