fechas

[monoswim]

porque en la regexp de

$fecha =~ s/(....)-(..)-(..)/$2-$3-$1/;

las variables $1 $2 $3 se llenan con lo que devuelven los paréntesis...

o sea que en esa línea ya quedca la fecha bien configurada...