#!/usr/bin/perl -w
use MIME::Lite;         # send mail attachments
use Sys::Hostname;      # Used to insert hostname in emails
use Cwd;                # Get current full dir for error msgs
use strict;             # Enforce declarations

    my (

        $hostname,          # name of this box for sending
        $prog_full_name,    # prog path + name
        $contact_email,     # contact email address
        $msg,               # msg object
        $sender,            # sender of email 
        $subject,           # subject line in email
        $body_text          # actual email msg text
        );

    
    # Get hostname anyway we can using Sys::Hostname;
    # tries syscall(SYS_gethostname), `hostname`, `uname -n`
    $hostname = Sys::Hostname::hostname();

    # Get program full path name
    $prog_full_name = cwd()."/${0}";

    # Set the fields required by Mailer...
    $contact_email = '';
    $sender = "$prog_full_name";
    $subject = "$prog_full_name: Asset Mgr Report";
    $body_text = "This is an automated message:\n\n";

    # ... and send it
    # Header
    $msg = MIME::Lite->new(
                            From    => $sender,
                            To      => $contact_email,
                            Subject => $subject,
                            Type    =>'multipart/mixed'
                            );
    # Body Content
    $msg->attach(
                Type     => 'TEXT',
                Data     => $body_text
                );
    # Attachment
    $msg->attach(
                Type     => 'text/plain',
                Path     => "/home/chrism/t.csv",
                Filename => "t.csv",
                Disposition => 'attachment'
                );
    # Send
    $msg->send or print "Error: $@\n";
[download]

sendmail: fatal: No recipient addresses found in message header
Error:
[download]

If I try this instead

    eval{$msg->send};
    print "Error: $@\n" if($@);
[download]

The error message

No recipient addresses found in message header
[download]

seems to confirm that you never set $contact_email. Did you just remove your email address from the line initializing it for privacy reasons or is the recipient really empty?

$contact_email = 'chrism01@example.com';
[download]

would be an example of initializing the email address. Of course, you would possibly use a local email address instead of an address that is routed through the internet.

As per my orig post, I did it deliberately, in order to force the error, so I could test the error handling....
Unfortunately I can't 'grab' the error msg for further processing....