use Mail::SendEasy;
use RTF::Writer;

my $rtf = RTF::Writer->new_to_file("greetings.rtf");
      $rtf->prolog( 'title' => "Greetings, hyoomon" );
      $rtf->number_pages;
      $rtf->paragraph(
        \'\fs40\b\i',  # 20pt, bold, italic
        "Hi there!"
      );
      $rtf->close;

my $status=Mail::SendEasy::send(
	from 	=> 'sender@company.com',
	to 	=> 'receiver@company.com',
	subject	=> "Morning Report",
	anex 	=> "greetings.rtf");