my $msg = new MIME::Lite(
              From    => $defaults{EMAIL_FROM},
              To      => $defaults{EMAIL_TO},
              Subject => $defaults{EMAIL_SUBJECT},
              Type    => 'text/plain'
              );
        $msg->attach(
             Type        => 'text/html',
             Encoding    => '8bit',
             Path     => "$defaults{REPORT_DIR}$defaults{REPORT_FILE_NAME}",
                        );
        MIME::Lite->send( 'smtp', 'localhost', Timeout => 20 );

        my ($result) = $msg->send();