On Thu, Jan 31, 2002 at 08:31:26PM -0500, Bill -OSX- Jones wrote:
> my ($sec,$min,$hour,$mday,$mon,$year,$wday) = localtime;
>
> # Then -
> my $vdate = sprintf("%02d", $mon + 1) . '/' . sprintf("%02d", $mday);
> $vdate .= '/' . ($year += 1900);
Or,
my ($mday, $mon, $year) = (localtime)[3..5];
my $vdate = sprintf "%d/%02d/%02d", $year+1900, $mon+1, $mday;
MM/DD/YY(YY)? is evil, IMO.
Paul
--
Paul Makepeace ....................................... http://paulm.com/
"What is the nature of mans inhumanity to mans humanity? Foolish Pride!"
-- http://paulm.com/toys/surrealism/
