diff options
Diffstat (limited to 'dbxrecover-1p')
| -rwxr-xr-x | dbxrecover-1p | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dbxrecover-1p b/dbxrecover-1p index 0ed226c..bd40cd2 100755 --- a/dbxrecover-1p +++ b/dbxrecover-1p @@ -161,7 +161,7 @@ use warnings; ($next, $data) = $self->combine($idhash, $nexthash, $next, $data, 1); ($id, $data) = $self->combine($nexthash, $idhash, $id, $data, 0); - # the test for first chunk is very simple and naive, but it works well enough + # TODO: better test for first chunk. Maybe a grace period to keep seemingly complete messages, in case of false positives. $self->{stats}->{chainscompl}++,return($data->join()) if (($next == 0) && ($data->first() =~ /^(From|From:|Return-Path:|Received:) /)); $idhash->{$id} = {} if (!defined($idhash->{$id})); $nexthash->{$next} = {} if (!defined($nexthash->{$next})); |