> -----Original Message-----
> From: Brian [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, November 29, 2001 5:12 PM
> To: [EMAIL PROTECTED]
> Subject: Two parter
>
>
> #1 -- Thanks to everyone who helped me with my first question.
>
> #2 -- Does pearl have a "date" variable. I just need MM/DD/YYYY
> Do would I need to make a system call?
No "date" variable. Perl (not "pearl") has time(), which returns
epoch seconds, and then localtime() and gmtime() which convert
to date/time representation.
To get current date as MM/DD/YYYY, you can use:
my ($d, $m, $y) = (localtime)[3..5];
$m++;
$y += 100;
my $date = sprintf('%02d/%02d/%04d', $m, $d, $y);
Or, use POSIX::strftime():
use POSIX qw(strftime);
my $date = strftime('%m/%d/%Y', localtime)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
