Jonathan Dudson wrote: > I am pretty much a newbie when it comes to perl. > > I am trying to break up either localtime or time so they I end up with > three separate variables $date (06) $month(02) $year(2006) that I can > use in an archiving script. > > Someone suggested using date calc but that appears to work with values > passed to it that you may already have. > > Any suggestions would be great.
my ($date, $month, $year) = (localtime)[3,4,5]; $month++, $year += 1900; print "$date, $month, $year\n"; The month is in 0-11 form and you may have to add one for printing and the year is 1900 based. _______________________________________________ ActivePerl mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
