Re^4: GMT to PST format

Date::Manip module is installed. But when I use the code

#!/usr/bin/perl

use strict;
use warnings;

use Date::Manip;

my $date_manip_object = new Date::Manip;

$date_manip_object->parse( '2 days ago' );
$date_manip_object->convert( 'GMT' );

my $gmt_ref = $date_manip_object->printf( '%Y%m%d') ;

while (<DATA>) {
    my $err = $date_manip_object->parse_format('.*?\\[%d/%b/%Y:%T\s+%z
+\\].*', $_);

    next if $err; # skip (?) lines that do not match the date format

    my $input_line_date = $date_manip_object->printf( '%Y%m%d') ;

    if ($input_line_date eq $gmt_ref) {
       print;
    }
}

__DATA__
10.1.10.178  -       -       [15/Jun/2010:23:30:34    +0000]      -
10.1.10.178  -       -       [16/Jun/2010:23:30:34    +0000]      -
[download]

Can't locate object method "new" via package "Date::Manip" at

Comment on Re^4: GMT to PST format Download Code

Replies are listed 'Best First'.
Re^5: GMT to PST format by Corion (Patriarch) on Jun 20, 2010 at 08:38 UTC
`my $date_manip_object = new Date::Manip;` [download] Where in the documentation did you find that usage? It doesn't work because the module does not work that way. Read Date::Manip.	[reply] [d/l]
Re^6: GMT to PST format by Anonymous Monk on Jun 20, 2010 at 08:44 UTC
`10.1.10.178 - - [15/Jun/2010:23:30:34 +0000] - 10.1.10.178 - - [16/Jun/2010:23:30:34 +0000] -` [download] The date and time is in GMT. I should convert to PST time. `#!/usr/bin/perl use Date::Manip; $date = ParseDate("2 days ago"); print $date` [download] This works and why created a object doenst work.	[reply] [d/l] [select]
Re^7: GMT to PST format by Corion (Patriarch) on Jun 20, 2010 at 08:56 UTC
Maybe you should read the documentation. If a class method `->new` is not defined, it will not work. Most likely, you have a deeper misunderstanding about how objects work in Perl. `->new` is a subroutine like any other subroutine, and not a keyword as it is in other languages. So if the module programmer does not provide you with a subroutine `->new`, then you cannot call it and Perl tells you so.	[reply] [d/l] [select]
Re^7: GMT to PST format by Anonymous Monk on Jun 20, 2010 at 08:49 UTC
`#!/usr/bin/perl use Date::Manip; $date = Date_ConvTZ($date1,'GMT','PST'); print $date` [download] Is this command converts to PST format?	[reply] [d/l]