Select Code to Download

if( $textline =~ m/invoked by \w+ at (.+)$/ ) {
    $datetext = $1;
}

my $datetime = str2time( $datetext ) or die "Unrecognized date format.
+\n";