Help for this page
c:\@Work\Perl>perl -wMstrict -le "my $c = q{asdfghjk}; ... intermediate: 'asdf__gh__jk' intermediate: 'asdf__g_h!h_!_jk' final: 'asdf__g_h!h_!_jk'