/e
permite la evaluación como expresión perl de la
cadena de reemplazo (En vez de considerarla como una cadena delimitada
por doble comilla).
1 #!/usr/bin/perl -w 2 $_ = "abc123xyz\n"; 3 s/\d+/$&*2/e; 4 print; 5 s/\d+/sprintf("%5d",$&)/e; 6 print; 7 s/\w/$& x 2/eg; 8 print;El resultado de la ejecución es:
> replacement.pl abc246xyz abc 246xyz aabbcc 224466xxyyzz
Casiano Rodríguez León