Re: How to convert time stamp to unix time ?

In addition to Time::Local which jettero mentioned, you could also use Date::Calc, DateTime, and for good measure Date::Manip.

Parsing hint:

my $stamp = "100117104030";
my ($YY, $MM, $DD, $hh, $mm, $ss) = ($stamp =~ /^(\d{2})(\d{2})(\d{2})
+(\d{2})(\d{2})(\d{2})/);
[download]

Comment on Re: How to convert time stamp to unix time ? Download Code

Replies are listed 'Best First'.
Re^2: How to convert time stamp to unix time ? by AnomalousMonk (Archbishop) on Feb 03, 2010 at 14:47 UTC
The regex `/^(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/` could surely be shortened to `m{ \d{2} }xmsg` `>perl -wMstrict -le "my $stamp = '100117104030'; my ($YY, $MM, $DD, $hh, $mm, $ss) = $stamp =~ m{ \d{2} }xmsg; print $stamp; print qq{$YY $MM $DD $hh $mm $ss}; " 100117104030 10 01 17 10 40 30` [download]	[reply] [d/l] [select]
Re^3: How to convert time stamp to unix time ? by Your Mother (Archbishop) on Feb 03, 2010 at 18:27 UTC
What are the "m" and the "s" for. :)	[reply]
Re^4: How to convert time stamp to unix time ? by AnomalousMonk (Archbishop) on Feb 04, 2010 at 07:16 UTC
They are magical charms against foot injury and late night hair loss. I make enough Stupid Regex Mistakes that I fear to be without them.	[reply]
Re^3: How to convert time stamp to unix time ? by Anonymous Monk on Feb 03, 2010 at 17:54 UTC
And in this case, `m{ \d{2} }xmsg` could be `/(\d\d)/g`	[reply] [d/l] [select]
Re^4: How to convert time stamp to unix time ? by AnomalousMonk (Archbishop) on Feb 04, 2010 at 07:10 UTC
... and, indeed, `/\d\d/g`	[reply] [d/l]