in reply to Production level script template
my ($dsec,$dmin,$dhour,$dday,$dmon,$dyear,$dwday)=(localtime)[0..6]; my $monname = ('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug', 'Sep','Oct','Nov','Dec')[$dmon]; my $dayname = ('Sun','Mon','Tue','Wed','Thu','Fri','Sat')[$dwday];
Consult POSIX::strftime and your system's strftime manual page.
--
We're looking for people in ATL
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: Production level script template
by del (Pilgrim) on Sep 08, 2005 at 19:10 UTC | |
by Tanktalus (Canon) on Sep 08, 2005 at 19:21 UTC |
In Section
Seekers of Perl Wisdom