}
my $result = $sth->fetchall_arrayref({})->[0];
- my $whydie = $result->{details} || '';
+ my $whydie = $result->{status} || '';
$whydie =~ s/\\n */\n /g;
$whydie =~ s/: ERROR:/:\n ERROR:/;
$whydie =~ s/ (at .+ line \d+\.)/\n $1/g;
$whydie =~ s/\t/<tab>/g;
- my $message = sprintf " PID %s\nStarted: %s\n Ended: %s\n %s",
+ my $message = sprintf " Started: %s\n Ended: %s\n %s",
$result->{pid} || '?',
$result->{started} || '?',
$result->{ended} || '?',