-Original Message-
> From: Etienne Marcotte [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, December 05, 2001 10:36 AM
> To: Shinagare, Sandeep
> Cc: '[EMAIL PROTECTED]'
> Subject: Re: today's date
>
> sub get_date {
> my @months = qw(January Febuary Mar
.
-Original Message-
From: Matt Richter [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, December 05, 2001 15:46
To: [EMAIL PROTECTED]
Subject: RE: today's date
Hmmm..
I've seen these examples in books and previously on this list. I'm
surprised by the amount code it takes to disp
a different server?
Just Wondering.
Matt Richter
-Original Message-
From: Etienne Marcotte [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, December 05, 2001 10:36 AM
To: Shinagare, Sandeep
Cc: '[EMAIL PROTECTED]'
Subject: Re: today's date
sub get_date {
my @months =
res, Jose" <[EMAIL PROTECTED]>
> To: "'Shinagare, Sandeep'" <[EMAIL PROTECTED]>;
> <[EMAIL PROTECTED]>
> Sent: Wednesday, December 05, 2001 2:09 PM
> Subject: RE: today's date
>
> > In the code below, is there a Perl built-in f
ere a Perl built-in function to pass $DAY into
> so that a "9" comes out "09"? I need digits from 1 to 9 to be of the form
> 01, 02, etc. Ideas? Thanks.
>
> -Jose
>
> -Original Message-
> From: Shinagare, Sandeep [mailto:[EMAIL PROTECTED]]
> Sent: We
ou could just add a 0 infront of it.
>
> Good luck,
> Tyler Longren
>
> - Original Message -
> From: "Torres, Jose" <[EMAIL PROTECTED]>
> To: "'Shinagare, Sandeep'" <[EMAIL PROTECTED]>;
> <[EMAIL PROTECTED]>
> Sent: Wedn
27;Shinagare, Sandeep'" <[EMAIL PROTECTED]>;
<[EMAIL PROTECTED]>
Sent: Wednesday, December 05, 2001 2:09 PM
Subject: RE: today's date
> In the code below, is there a Perl built-in function to pass $DAY into
> so that a "9" comes out "09&
dnesday, December 05, 2001 11:27 AM
To: '[EMAIL PROTECTED]'
Subject: today's date
Hi Folks!
Trying to get todays date and month... was able to find this...
#snip-start
use Time::localtime;
$tm = localtime;
($DAY, $MONTH, $YEAR) = ($tm->mday, $tm->mon, $tm->year);
#
> > -Original Message-
> > From: Shinagare, Sandeep [mailto:[EMAIL PROTECTED]]
> > Sent: Wednesday, December 05, 2001 11:27 AM
> > To: '[EMAIL PROTECTED]'
> > Subject: today's date
> >
> >
> > Hi Folks!
> > Tryi
sub get_date {
my @months = qw(January Febuary March April May June July August
September October November December);
my ($day, $mon, $yr) = (localtime)[3,4,5];
return (sprintf("%02d", $day), $months[$mon], $yr + 1900);
}
my ($day, $month, $year) = get_date();
You need to "code" the conver
$thismonth $thisyear";
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: 05 December 2001 16:29
To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
Subject: RE: today's date
There are a number of date formatting routines available at
http://search.cpan.org/.
There are a number of date formatting routines available at
http://search.cpan.org/.
> -Original Message-
> From: Shinagare, Sandeep [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, December 05, 2001 11:27 AM
> To: '[EMAIL PROTECTED]'
> Subject: today's date.
Hi Folks!
Trying to get todays date and month... was able to find this...
#snip-start
use Time::localtime;
$tm = localtime;
($DAY, $MONTH, $YEAR) = ($tm->mday, $tm->mon, $tm->year);
#snip-end
this gives me the Day and Month in numbers.. anyway in which i
can get "Mon","Tue","Wed" and "Jan
13 matches
Mail list logo
