- or download this
my $target = UnixDate(
Date_ConvTZ( ParseDate("3 days ago"), 'PST', 'GMT' )
...
m/\[$target:/ and print DATA $_ while <FH>;
close DATA;
close FH;
- or download this
substr( $_, 34, 11 ) eq $target and print DATA $_ while <FH>
- or download this
print if $logSecs > $startSecs && $logSecs < $endSecs;