Timestamp conversion in PERL Post: 302642957

Login or Register to Ask a Question and Join Our Community

Sponsored Content

Top Forums Shell Programming and Scripting Timestamp conversion in PERL Post 302642957 by radoulov on Friday 18th of May 2012 09:00:07 AM

Old

05-18-2012

Registered User

If you mean date to Unix epoch,
with standard modules you could use
something like this:

Code:

perl -MTime::Local -F'\|' -lane'BEGIN {
  @m{ 
    qw[Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec] 
    } = 0 .. 11;
  }
  
  @dt = split /[\. -]/, $F[1];
  $dt[3] += 12 if $dt[7] eq "PM";
  
  $F[1] = 
    timelocal $dt[5], $dt[4], $dt[3], $dt[0], 
      $m{$dt[1]}, ($dt[2] > 69 ? 2000 : 1900) + $dt[2] - 1900;
      
  print join "|", @F;
  ' infile

Last edited by radoulov; 05-18-2012 at 10:06 AM..

radoulov

View Public Profile for radoulov

Find all posts by radoulov

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

conversion from EPOCH timestamp to local time zone

hello gurus, i want a perl/shell script which once invoked should convert a set of EPOCH timestamps to local time ( IST..i want) . how does it work ,i have an idea on that..but writing a perl/shell script for it is not possible for me...so i need help for the same. my exact requirement is...

2. Shell Programming and Scripting

Timestamp to date conversion in ksh

Hi, I have a file containing timestamp( Example given below). How can i get date(mmd-dd-yyyy) from it? ($> cat file1.txt 2008-11-24 05:17:00.7043) Thanks, Sri

3. Shell Programming and Scripting

conversion of different timestamp to standard timestamp

hi i need a scrit to convert one date format to another. for example i have three columns in a file which gets a different format, but lastly i want output with stadard timestamp as "yyyy-mm-dd hh:mm:ss" column1 column2 ...

4. Shell Programming and Scripting

[Perl] Timestamp conversion

Hi, I have searched, read and tried, but no luck. I have this code: #!/bin/perl -w #-d use strict; use POSIX qw(strftime); my $getprpw_list="/usr/lbin/getprpw -l"; my $host = "nbsol151"; my $user = "genadmin"; my %uid; my %spwchg; my %upwchg; my %slogint;

5. Programming

timestamp conversion problem.

Hi all. I have the following code: #include<stdio.h> #include<time.h> int main() { struct tm tm; time_t time = 1262322000; /*Jan, 01, 2010*/ char temp; int i = 0; while(i < 4) { memset(temp, 0, 128); localtime_r(&time,...

6. AIX

Need timestamp conversion shell script !!

Can anyone provide me with a ksh or bash script which will accept a timestamp (format is YYYY-MM-DD-HH24.Mi.Ss) and time offset (in hours). The output will be (timestamp passed - time offset passed deducted from it) in the same YYYY-MM-DD-HH24.Mi.Ss format. Basically I am trying to convert the...

7. Shell Programming and Scripting

Epoch & Unix Timestamp Conversion Tools

Hi All, Please read the below data carefully. I need an unix command for converting unix timestamp to Epoch timestamp. I need to daily convert this today's unix(UTC) time to epoch time, so i am thinking to make a shellscript for this. Please help me for this by providing...

8. Shell Programming and Scripting

conversion of loop in perl

Hello Sir, How can i convert below two loop lines in perl for BLOCK in /sys/block/myblock* for BLOCK in /dev/myblock* How i can write them in perl like foreach( </sys/block/myblock*/queue/nr_requests> )

9. Shell Programming and Scripting

GMT to MST timestamp conversion

Hi Team, We have written a perl script to perform the GMT to MST timestamp conversion. Input: 2013-12-01T05:23:19.374 Output: need the given timestamp in MT (MST/MDT) #!/usr/bin/perl use strict; use warnings; use Time::Local; #always gmt #my $tval = '2013-12-01T05:23:19.374'; ...

10. Shell Programming and Scripting

Timestamp conversion

Hello All, I have a file with many timestamps as in below format & example: 20150130105120 2015-> Year in YYYY 01-> Month in MM 30-> Day in DD 10-> Hour in HH 51-> Minute in mm 20-> Seconds in SS This is in GMT. I want to convert all these time stamps in GMT+5:30 format.. Can...

LEARN ABOUT CENTOS

datetime::locale::en

DateTime::Locale::en(3) 				User Contributed Perl Documentation				   DateTime::Locale::en(3)

NAME

       DateTime::Locale::en

SYNOPSIS

	 use DateTime;

	 my $dt = DateTime->now( locale => 'en' );
	 print $dt->month_name();

DESCRIPTION

       This is the DateTime locale package for English.

DATA

       This locale inherits from the DateTime::Locale::root locale.

       It contains the following data.

   Days
       Wide (format)

	 Monday
	 Tuesday
	 Wednesday
	 Thursday
	 Friday
	 Saturday
	 Sunday

       Abbreviated (format)

	 Mon
	 Tue
	 Wed
	 Thu
	 Fri
	 Sat
	 Sun

       Narrow (format)

	 M
	 T
	 W
	 T
	 F
	 S
	 S

       Wide (stand-alone)

	 Monday
	 Tuesday
	 Wednesday
	 Thursday
	 Friday
	 Saturday
	 Sunday

       Abbreviated (stand-alone)

	 Mon
	 Tue
	 Wed
	 Thu
	 Fri
	 Sat
	 Sun

       Narrow (stand-alone)

	 M
	 T
	 W
	 T
	 F
	 S
	 S

   Months
       Wide (format)

	 January
	 February
	 March
	 April
	 May
	 June
	 July
	 August
	 September
	 October
	 November
	 December

       Abbreviated (format)

	 Jan
	 Feb
	 Mar
	 Apr
	 May
	 Jun
	 Jul
	 Aug
	 Sep
	 Oct
	 Nov
	 Dec

       Narrow (format)

	 J
	 F
	 M
	 A
	 M
	 J
	 J
	 A
	 S
	 O
	 N
	 D

       Wide (stand-alone)

	 January
	 February
	 March
	 April
	 May
	 June
	 July
	 August
	 September
	 October
	 November
	 December

       Abbreviated (stand-alone)

	 Jan
	 Feb
	 Mar
	 Apr
	 May
	 Jun
	 Jul
	 Aug
	 Sep
	 Oct
	 Nov
	 Dec

       Narrow (stand-alone)

	 J
	 F
	 M
	 A
	 M
	 J
	 J
	 A
	 S
	 O
	 N
	 D

   Quarters
       Wide (format)

	 1st quarter
	 2nd quarter
	 3rd quarter
	 4th quarter

       Abbreviated (format)

	 Q1
	 Q2
	 Q3
	 Q4

       Narrow (format)

	 1
	 2
	 3
	 4

       Wide (stand-alone)

	 1st quarter
	 2nd quarter
	 3rd quarter
	 4th quarter

       Abbreviated (stand-alone)

	 Q1
	 Q2
	 Q3
	 Q4

       Narrow (stand-alone)

	 1
	 2
	 3
	 4

   Eras
       Wide

	 Before Christ
	 Anno Domini

       Abbreviated

	 BC
	 AD

       Narrow

	 B
	 A

   Date Formats
       Full

	  2008-02-05T18:30:30 = Tuesday, February 5, 2008
	  1995-12-22T09:05:02 = Friday, December 22, 1995
	 -0010-09-15T04:44:23 = Saturday, September 15, -10

       Long

	  2008-02-05T18:30:30 = February 5, 2008
	  1995-12-22T09:05:02 = December 22, 1995
	 -0010-09-15T04:44:23 = September 15, -10

       Medium

	  2008-02-05T18:30:30 = Feb 5, 2008
	  1995-12-22T09:05:02 = Dec 22, 1995
	 -0010-09-15T04:44:23 = Sep 15, -10

       Short

	  2008-02-05T18:30:30 = 2/5/08
	  1995-12-22T09:05:02 = 12/22/95
	 -0010-09-15T04:44:23 = 9/15/-10

       Default

	  2008-02-05T18:30:30 = Feb 5, 2008
	  1995-12-22T09:05:02 = Dec 22, 1995
	 -0010-09-15T04:44:23 = Sep 15, -10

   Time Formats
       Full

	  2008-02-05T18:30:30 = 6:30:30 PM UTC
	  1995-12-22T09:05:02 = 9:05:02 AM UTC
	 -0010-09-15T04:44:23 = 4:44:23 AM UTC

       Long

	  2008-02-05T18:30:30 = 6:30:30 PM UTC
	  1995-12-22T09:05:02 = 9:05:02 AM UTC
	 -0010-09-15T04:44:23 = 4:44:23 AM UTC

       Medium

	  2008-02-05T18:30:30 = 6:30:30 PM
	  1995-12-22T09:05:02 = 9:05:02 AM
	 -0010-09-15T04:44:23 = 4:44:23 AM

       Short

	  2008-02-05T18:30:30 = 6:30 PM
	  1995-12-22T09:05:02 = 9:05 AM
	 -0010-09-15T04:44:23 = 4:44 AM

       Default

	  2008-02-05T18:30:30 = 6:30:30 PM
	  1995-12-22T09:05:02 = 9:05:02 AM
	 -0010-09-15T04:44:23 = 4:44:23 AM

   Datetime Formats
       Full

	  2008-02-05T18:30:30 = Tuesday, February 5, 2008 6:30:30 PM UTC
	  1995-12-22T09:05:02 = Friday, December 22, 1995 9:05:02 AM UTC
	 -0010-09-15T04:44:23 = Saturday, September 15, -10 4:44:23 AM UTC

       Long

	  2008-02-05T18:30:30 = February 5, 2008 6:30:30 PM UTC
	  1995-12-22T09:05:02 = December 22, 1995 9:05:02 AM UTC
	 -0010-09-15T04:44:23 = September 15, -10 4:44:23 AM UTC

       Medium

	  2008-02-05T18:30:30 = Feb 5, 2008 6:30:30 PM
	  1995-12-22T09:05:02 = Dec 22, 1995 9:05:02 AM
	 -0010-09-15T04:44:23 = Sep 15, -10 4:44:23 AM

       Short

	  2008-02-05T18:30:30 = 2/5/08 6:30 PM
	  1995-12-22T09:05:02 = 12/22/95 9:05 AM
	 -0010-09-15T04:44:23 = 9/15/-10 4:44 AM

       Default

	  2008-02-05T18:30:30 = Feb 5, 2008 6:30:30 PM
	  1995-12-22T09:05:02 = Dec 22, 1995 9:05:02 AM
	 -0010-09-15T04:44:23 = Sep 15, -10 4:44:23 AM

   Available Formats
       d (d)

	  2008-02-05T18:30:30 = 5
	  1995-12-22T09:05:02 = 22
	 -0010-09-15T04:44:23 = 15

       EEEd (d EEE)

	  2008-02-05T18:30:30 = 5 Tue
	  1995-12-22T09:05:02 = 22 Fri
	 -0010-09-15T04:44:23 = 15 Sat

       Hm (H:mm)

	  2008-02-05T18:30:30 = 18:30
	  1995-12-22T09:05:02 = 9:05
	 -0010-09-15T04:44:23 = 4:44

       hm (h:mm a)

	  2008-02-05T18:30:30 = 6:30 PM
	  1995-12-22T09:05:02 = 9:05 AM
	 -0010-09-15T04:44:23 = 4:44 AM

       Hms (H:mm:ss)

	  2008-02-05T18:30:30 = 18:30:30
	  1995-12-22T09:05:02 = 9:05:02
	 -0010-09-15T04:44:23 = 4:44:23

       hms (h:mm:ss a)

	  2008-02-05T18:30:30 = 6:30:30 PM
	  1995-12-22T09:05:02 = 9:05:02 AM
	 -0010-09-15T04:44:23 = 4:44:23 AM

       M (L)

	  2008-02-05T18:30:30 = 2
	  1995-12-22T09:05:02 = 12
	 -0010-09-15T04:44:23 = 9

       Md (M/d)

	  2008-02-05T18:30:30 = 2/5
	  1995-12-22T09:05:02 = 12/22
	 -0010-09-15T04:44:23 = 9/15

       MEd (E, M/d)

	  2008-02-05T18:30:30 = Tue, 2/5
	  1995-12-22T09:05:02 = Fri, 12/22
	 -0010-09-15T04:44:23 = Sat, 9/15

       MMM (LLL)

	  2008-02-05T18:30:30 = Feb
	  1995-12-22T09:05:02 = Dec
	 -0010-09-15T04:44:23 = Sep

       MMMd (MMM d)

	  2008-02-05T18:30:30 = Feb 5
	  1995-12-22T09:05:02 = Dec 22
	 -0010-09-15T04:44:23 = Sep 15

       MMMEd (E, MMM d)

	  2008-02-05T18:30:30 = Tue, Feb 5
	  1995-12-22T09:05:02 = Fri, Dec 22
	 -0010-09-15T04:44:23 = Sat, Sep 15

       MMMMd (MMMM d)

	  2008-02-05T18:30:30 = February 5
	  1995-12-22T09:05:02 = December 22
	 -0010-09-15T04:44:23 = September 15

       MMMMEd (E, MMMM d)

	  2008-02-05T18:30:30 = Tue, February 5
	  1995-12-22T09:05:02 = Fri, December 22
	 -0010-09-15T04:44:23 = Sat, September 15

       ms (mm:ss)

	  2008-02-05T18:30:30 = 30:30
	  1995-12-22T09:05:02 = 05:02
	 -0010-09-15T04:44:23 = 44:23

       y (y)

	  2008-02-05T18:30:30 = 2008
	  1995-12-22T09:05:02 = 1995
	 -0010-09-15T04:44:23 = -10

       yM (M/yyyy)

	  2008-02-05T18:30:30 = 2/2008
	  1995-12-22T09:05:02 = 12/1995
	 -0010-09-15T04:44:23 = 9/-010

       yMEd (EEE, M/d/yyyy)

	  2008-02-05T18:30:30 = Tue, 2/5/2008
	  1995-12-22T09:05:02 = Fri, 12/22/1995
	 -0010-09-15T04:44:23 = Sat, 9/15/-010

       yMMM (MMM y)

	  2008-02-05T18:30:30 = Feb 2008
	  1995-12-22T09:05:02 = Dec 1995
	 -0010-09-15T04:44:23 = Sep -10

       yMMMEd (EEE, MMM d, y)

	  2008-02-05T18:30:30 = Tue, Feb 5, 2008
	  1995-12-22T09:05:02 = Fri, Dec 22, 1995
	 -0010-09-15T04:44:23 = Sat, Sep 15, -10

       yMMMM (MMMM y)

	  2008-02-05T18:30:30 = February 2008
	  1995-12-22T09:05:02 = December 1995
	 -0010-09-15T04:44:23 = September -10

       yQ (Q yyyy)

	  2008-02-05T18:30:30 = 1 2008
	  1995-12-22T09:05:02 = 4 1995
	 -0010-09-15T04:44:23 = 3 -010

       yQQQ (QQQ y)

	  2008-02-05T18:30:30 = Q1 2008
	  1995-12-22T09:05:02 = Q4 1995
	 -0010-09-15T04:44:23 = Q3 -10

   Miscellaneous
       Prefers 24 hour time?

       No

       Local first day of the week

       Monday

SUPPORT

       See DateTime::Locale.

AUTHOR

       Dave Rolsky <autarch@urth.org>

COPYRIGHT

       Copyright (c) 2008 David Rolsky. All rights reserved. This program is free software; you can redistribute it and/or modify it under the
       same terms as Perl itself.

       This module was generated from data provided by the CLDR project, see the LICENSE.cldr in this distribution for details on the CLDR data's
       license.

perl v5.16.3							    2014-06-10						   DateTime::Locale::en(3)