use Time::Piece;

my $t1 = Time::Piece->strptime('Feb 23 01:10:28 2018', '%b %d %H:%M:%S %Y');

my $t2 = Time::Piece->strptime('02/23/18 01:10:33', '%m/%d/%y %H:%M:%S');

if ($t1 > $t2) { ... }

On 23/10/2018 09:17, Asad wrote:
Hi All ,

        first hurdle is how do I extract this Feb 23 01:10:28 2018  from file1 which regex can I use ?

         convert it into epoch

        then

         regex for 02/23/18 01:10:33  is required  ?

        convert into epoch

       So if you can suggest the correct regex for both timestamps.

Thanks,

On Tue, Oct 23, 2018 at 11:21 AM Asad <asad.hasan2...@gmail.com <mailto:asad.hasan2...@gmail.com>> wrote:

    Thanks, I will do that. It was for perl .

    On Tue, Oct 23, 2018 at 10:42 AM Jim Gibson <jimsgib...@gmail.com
    <mailto:jimsgib...@gmail.com>> wrote:

        On Oct 22, 2018, at 9:12 PM, Asad <asad.hasan2...@gmail.com
        <mailto:asad.hasan2...@gmail.com>> wrote:
        >
        > file1 :
        > Patching tool version 12.1.0.2.0 Production on Fri Feb 23
        01:10:28 2018
        >
        > Bootstrapping registry and package to current versions...done
        > statement ERR-2001: table is corrupt check for cause
        >
        > could not determine the current status.
        >
        > file2 :
        >
        >  LOG file opened at 02/03/18 01:11:05
        >
        > DUP-05004:   statement1
        > DUP-05007:   statement2
        >
        >
        >  LOG file opened at 02/03/18 01:11:14
        >
        > DUP-05004:   statement1
        >
        > DUP-05007:   statement2
        >
        >
        >  LOG file opened at 02/23/18 01:10:33
        >
        > DUP-05004:   statement1
        >
        > DUP-05007:   statement2
        >
        > I need to look for the ERR-2001 in file1 if it matches then
        go to file2 and print the message nearest to the timestamp
        found in file1 within two minutes of range .
        >
        > so in this case file1 :  Fri Feb 23 01:10:28 2018
        >                    range   file1 +2 mins :02/23/18 01:12:28
        > check in file 2 nearest to file1 and within range :  
         02/23/18 01:10:33
        >
        > how do i compare two timestamps in different format and
        within range  ?

        You would first convert the two timestamps to a common format,
        preferably one that used a numerical value to express times. I
        know of two such: the Unix epoch time that uses an integer to
        represent the number of seconds since 1 Jan 1970 UTM and the
        Julian date that uses a floating-point number to represent the
        number of days since 1 Jan 4713 BCE.

        Are you looking for a Perl solution or a Python one?

        For Perl, you should investigate time and date modules
        available on CPAN, such as Date::Manip or Date::Calc.



-- Asad Hasan
    +91 9582111698



--
Asad Hasan
+91 9582111698

Reply via email to