[perl] Re: Fecha

Herminio Heredia Santos herminio@xfiles.cmact.com
Fri, 21 Apr 2000 15:22:32 -0500


Vaya, creo que algunos permanecemos conectados a viento y marea en estos
dias "festivos" je.

Saludos.


Gunnar Wolf wrote:
> 
> > Hola!
> >
> > Estoy usando el modulo Date-Calc, pero no se como imprimir solo los dos
> > ultimos digitos del aņo.
> > Por ejemplo,
> > usando:       | me da como resultado:
> > Date_to_Text  | Mar 21-Mar-2000
> > Today         | 2000421
> >
> > Alguien me puede ayudar (usando Date-Calc) para imprimir solo los dos ultimos
> > digitos del aņo?
> > Necesito que quede la fecha como 000421 y no como 20000421
> >
> > Gracias!
> >
> > P.D. perdon por la ignorancia!
> 
> Si tienes una cadena 20000421 en $fecha, podrias hacer:
> 
> $fecha =~ s/\d\d(.+)/$1/;
> 
> y ya esta. Claro, hay otros modos, pero a mi me encantan las expresiones
> regulares :)
> 
> Salu!
--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : unsubscribe perl