$logtext =~ /^(.*)\Z/m; my $last = $1;