***** infoCopter.com/perl *****

create-oneliner-signatures



YOUR TEXT HERE

my $clear = "Have implemented several E-Commerce projects and network tools in pure Perl. Can't imagine a more sophisticated language for building Weblications in a matter of days.";

my $f = 'Habcdefghij \'.';
my $t = 'U0123456789zRF';

my $perlc = "\$clear =~ tr/$f/$t/";

print "--> $perlc\n\n"; eval($perlc);

print "$clear\n\n";

$perlc = "\$clear =~ tr/$t/$f/";

print "--> $perlc\n\n"; eval($perlc);

print $clear, "\n";
© reto :)