Hi !
> in the above case line 31 is
> my $mb = Mail::MboxParser->new("(\*STDIN)", decode => 'HEADER');
my $mb = Mail::MboxParser->new("\*STDIN", decode => 'HEADER');
should work fine (untested).
HTH,
Jan
--
cat /dev/world | perl -e "while (<>) {(/(^.*? \?) 42 \!/) && (print $1)}"
errors->(c)
-
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
