use Log::Painless {
                lineformat => sub { my $m = shift; $m=~s/^(.*?) \d+/$1/; return $m },
        };