my @message = <FH>;
Mail::Internet->new( \@message );