[UUG/MLUG] perl and y2k

["Routier, Daniel J." <EMAIL:PROTECTED>]

Okie so I figure this has been well known and i've missed the talk on it,
but:

($sec,$min,$hour,$mday,$month,$year,$yday,$isdst) = localtime(time);
$month = $month+1;
printf ('Submitted:  %02d/%02d/%02d  %02d:%02d:%02d', $month,
  $mday, $year, $hour, $min, $sec);  

Prints:
=====
Submitted:  01/05/100  08:15:18

So is there a commonly known solution to make localtime spit out 00 or
something that is a little
more accurate than 100 (?)  I've seen this on several sites (including mine)
=)

Daniel J Routier
Programmer / Analyst
Student Financial Aid
University of Missouri