Wenn mehrere Zeichen gegeneinander ausgetauscht werden sollen, bietet sich der
Transkritionsoperator an:
tr/PATTERN/SUBST/;
Der Operator tauscht alle Zeichen der Menge PATTERN gegen das entsprechende Zeichen
der
menge SUBST. Wenn ein Zeichen nicht im PATTERN vorhanden ist, wird es nicht verändert.
Fehlt ein entsprechendes korrespondierendes Zeichen in SUBST, wird das letzte Zeichen
verdoppelt.
$var = "fred feuerstein";
$var =~ tr/a-z/A-Z/; #
FRED FEUERSTEIN
$var =~ tr/A-Z/x/;
# xxxx xxxxxxxxxx
Soll das Zeichen rausfallen, muss man ein "d" nachsetzen:
$var = "FRED FEUERSTEIN";
$var =~ tr/A-Z/abcdefgh/d; # fed feee