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