Soy nueva en Perl y he tenido que cambiar unas fechas con formato como
- Código: Seleccionar todo
01-DEC-2010
a formato
- Código: Seleccionar todo
01 Dec 2010
Lo que he hecho en Perl ha sido lo siguiente:
Using perl Syntax Highlighting
$date =~ s/-/ /g;
$date =~ s/JAN/Jan/;
$date =~ s/FEB/Feb/;
$date =~ s/MAR/Mar/;
$date =~ s/APR/Apr/;
$date =~ s/MAY/May/;
$date =~ s/JUN/Jun/;
$date =~ s/JUL/Jul/;
$date =~ s/AUG/Aug/;
$date =~ s/SEP/Sep/;
$date =~ s/OCT/Oct/;
$date =~ s/NOV/Nov/;
$date =~ s/DEC/Dec/;
$date =~ s/JAN/Jan/;
$date =~ s/FEB/Feb/;
$date =~ s/MAR/Mar/;
$date =~ s/APR/Apr/;
$date =~ s/MAY/May/;
$date =~ s/JUN/Jun/;
$date =~ s/JUL/Jul/;
$date =~ s/AUG/Aug/;
$date =~ s/SEP/Sep/;
$date =~ s/OCT/Oct/;
$date =~ s/NOV/Nov/;
$date =~ s/DEC/Dec/;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
Supongo que tiene que haber una manera un poco más elegante y corta de hacerlo, ya que simplemente es cambiar lo "-" por espacios y pasar a minusculas 2 letras del mes.
¿Alguien sabe como hacerlo?
¡Gracias!