On Wed, Oct 11, 2006 at 02:48:28PM -0700, Vincent Li wrote:
> my $fh;
> open $fh, "<", shift;
> my @message = <$fh>;
>
> use Mail::SpamAssassin::Message;
> my $msg = Mail::SpamAssassin::Message->new(
> {
> 'message' => [EMAIL PROTECTED],
> }FYI, new() accepts a file handle, an array, a scalar, or undef (which causes it to use \*STDIN). So you don't need to slurp the message data in first. :) -- Randomly Selected Tagline: All in a days work for "Confuse-a-Cat".
pgp8ev9w34Yhn.pgp
Description: PGP signature
