Flemming Greve Skovengaard wrote: > printf ("%02d/%02d/%02d\n", $month + 1, $day, $year - 100); > # Only works when $year > 1999.
And when $year <= 2099 :~) Stick to $year % 100; -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>