my  $email = Email::Stuffer->to('Simon Cozens<simon@somewhere.jp>')
    ->from('Santa@northpole.org')
    ->text_body("You've been good this year. No coal for you.")
    ->attach($getMessage_obj->getFileData,content_type => 'image/anc',
					disposition  => "anc",
					name         => 'image.anc',
					Id => 'anc-id')
     ->email;

my $email_str = $email->as_string;

print $email_str;