NAME

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

SYNOPSIS

            

              
              
use SysAdmin::SMTP;
         
my $smtp_object = new SysAdmin::SMTP(server => "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(server => "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.