mreaves has asked for the wisdom of the Perl Monks concerning the following question:
I need to covert the format of a datetime variable found in a log file from format: "05/1/13 16:45" to format: "May 01 2013 16:45:00 GMT".
I presume the approach would be to parse the text datetime into a Perl datetime variable and format the results appropriately.
I can parse & load the variable, however I having trouble formatting it.
Any suggestions would be greatly appreciated.
The error result I get is:#!perl -w use POSIX 'strftime'; use Date::Calc qw(:all); $datetimestring = "4/5/13 16:09"; #split datetimestring into date & time ($date_raw, $time_raw) = split(/ /, $datetimestring); print "the date_raw is: $date_raw \n"; #split the date into MM DD YY ($m0_raw, $d0_raw, $y0_raw) = split(/\//, $date_raw); $m_raw = sprintf ("%02d", $m0_raw); print "the m_raw is: $m_raw \n"; $d_raw = sprintf ("%02d", $d0_raw); print "the d_raw is: $d_raw \n"; $y_raw = 2000 + $y0_raw; print "the y_raw is: $y_raw \n\n"; print "the time_raw is: $time_raw \n"; #split the time_raw into HH MM ($hh_raw, $mm_raw) = split(/:/, $time_raw); print "the hh_raw is: $hh_raw \n"; print "the mm_raw is: $mm_raw \n\n"; $s0_raw = 0; $ss_raw = sprintf ("%02d", $s0_raw); #load a Perl datetime variable using mktime $datetime1 = Mktime($y_raw,$m_raw,$d_raw, $hh_raw, $mm_raw, $ss_ra +w); print "the loaded datetime variable is: $datetime1 \n"; #format the datetime variable to match the require format MON dd yyyy +HH:MM:SS GMT $time2 = strftime(%b %d, %y %T, $m_raw, $d0_raw, $y_raw, $hh_raw, +$mm_raw, $ss_raw); print "the formatted date time is: $time2 \n";
Argument "d" isn't numeric in modulus (%) at playdate.pl line 36. Illegal modulus zero at playdate.pl line 36.
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: formatting datetime with strftime
by ramlight (Friar) on Jul 22, 2013 at 14:23 UTC | |
by mreaves (Initiate) on Jul 22, 2013 at 14:51 UTC | |
by toolic (Bishop) on Jul 22, 2013 at 14:55 UTC | |
by mreaves (Initiate) on Jul 22, 2013 at 15:21 UTC | |
by poj (Abbot) on Jul 22, 2013 at 15:36 UTC | |
by poj (Abbot) on Jul 22, 2013 at 15:34 UTC | |
Re: formatting datetime with strftime
by Loops (Curate) on Jul 22, 2013 at 14:53 UTC | |
Re: formatting datetime with strftime
by Cristoforo (Curate) on Jul 22, 2013 at 15:51 UTC | |
Re: formatting datetime with strftime
by GeneralElektrix (Acolyte) on Jul 22, 2013 at 15:40 UTC | |
by GeneralElektrix (Acolyte) on Jul 22, 2013 at 18:08 UTC | |
Re: formatting datetime with strftime
by mtmcc (Hermit) on Jul 22, 2013 at 14:38 UTC |
Back to
Seekers of Perl Wisdom