Using perl Syntax Highlighting
- #!usr/bin/perl
- my $texto = "hola mundo chau";
- $texto=~s/a/1/;
- $texto=~s/b/2/;
- $texto=~s/c/3/;
- $texto=~s/d/4/;
- print $texto;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
La pregunta es si habría la forma de reducir 4 líneas de sustitución para que quede solo una línea.
¿ Se puede hacer ?
