Help for this page
$string =~ s/(.)\1+/$1/g; # or... #$string =~ tr/A-Za-z0-9//s; $string =~ tr///sc; # update: use this instead