Help for this page
use strict; use warnings; ... ( my $filter = $filterClean ) =~ s{([A-Za-z])}{$filterMap{ $1 }}g; say qq{$filterClean --> $filter}; }
GAV18 --> 42818 gAv18 --> 42818 peter --> 73837 Bill34 --> 245534
www.com | www.net | www.org
No recent polls found