Re^2: transliteration d flag not working as expected

You could also do it with a single s/// substitution, although it is messier and almost certainly slower than a double-tr/// approach:

>perl -wMstrict -le
"my %xlate = qw(t f  h l  i i  s p);
 ;;
 my $s = 'alters';
 $s =~ s{ . }{ $xlate{${^MATCH}} // '' }xmsgpe;
 print qq{'$s'};
"
'fp'
[download]

Comment on Re^2: transliteration d flag not working as expected Select or Download Code

Replies are listed 'Best First'.
Re^3: transliteration d flag not working as expected by LanX (Sage) on Jun 09, 2013 at 12:29 UTC
Not sure if it's slower, 'tr///' doesn't allow variable interpolation. Using it twice in a DRY way means putting the pattern into a variable which leads to `eval` :( `Because the transliteration table is built at compile time, ne +ither the SEARCHLIST nor the REPLACEMENTLIST are subjected to dou +ble quote interpolation. That means that if you want to use va +riables, you must use an eval():` [download] Cheers Rolf ( addicted to the Perl Programming Language)	[reply] [d/l] [select]
Re^4: transliteration d flag not working as expected by AnomalousMonk (Archbishop) on Jun 09, 2013 at 13:14 UTC
What I had in mind was that `s///` would be messier/slower if interpolation was unnecessary, as the OPed problem statement seemed to indicate. I agree that if interpolation becomes necessary, `s///` is almost certainly preferable to an eval approach.	[reply] [d/l] [select]


Do you know where your variables are?
	PerlMonks