NAME

SysAdmin::SMTP - Perl Net::SMTP class wrapper module.

SYNOPSIS

        use SysAdmin::SMTP;
        
        my $smtp_object = new SysAdmin::SMTP("localhost");
        
        my $from_address = qq("Test User" <test_user\@test.com>);
        my $subject = "Test Subject";
        my $message_body = "Test Message";
        my $email_recipients = ["test_receiver\@test.com"];
        
        $smtp_object->sendEmail("FROM"    => "$from_address",
                            "TO"      => "$email_recipients",
                            "SUBJECT" => "$subject",
                            "BODY"    => "$message_body");
        

DESCRIPTION

This is a sub class of SysAdmin. It was created to harness Perl Objects and keep code abstraction to a minimum.

SysAdmin::SMTP uses Net::SMTP, MIME::Lite to send emails.

METHODS

new()

        my $smtp_object = new SysAdmin::SMTP("localhost");
        

Declare the SysAdmin::SMTP object instance. Takes the SMTP server as the only variable to use.

sendEmail()

        my $from_address = qq("Test User" <test_user\@test.com>);
        my $subject = "Test Subject";
        my $message_body = "Test Message";
        my $email_recipients = ["test_receiver\@test.com"];
        
        $smtp_object->sendEmail("FROM"    => "$from_address",
                            "TO"      => "$email_recipients",
                            "SUBJECT" => "$subject",
                            "BODY"    => "$message_body");
                                                                                                                

SEE ALSO

Net::SMTP - Simple Mail Transfer Protocol Client MIME::Lite - low-calorie MIME generator

AUTHOR

Miguel A. Rivera

COPYRIGHT AND LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.