NAME
Mail::SendEasy::SMTP - Handles the communication with the SMTP server without dependencies.
DESCRIPTION
This module will handle the communication with the SMTP server. It hasn't dependencies and supports authentication.
USAGE
use Mail::SendEasy ;
$smtp = Mail::SendEasy::SMTP->new( 'domain.foo' , 25 , 120 ) ;
if ( !$smtp->auth ) { warn($smtp->last_response_line) ;}
if ( $smtp->MAIL("FROM:<$mail{from}>") !~ /^2/ ) { warn($smtp->last_response_line) ;}
if ( $smtp->RCPT("TO:<$to>") !~ /^2/ ) { warn($smtp->last_response_line) ;}
if ( $smtp->RCPT("TO:<$to>") !~ /^2/ ) { warn($smtp->last_response_line) ;}
if ( $smtp->DATA =~ /^3/ ) {
$smtp->print("To: foo@foo") ;
$smtp->print("Subject: test") ;
$smtp->print("\n") ;
$smtp->print("This is a sample MSG!") ;
if ( $smtp->DATAEND !~ /^2/ ) { warn($smtp->last_response_line) ;}
}
$smtp->close ;
METHODS
new ($host , $port , $timeout , $user , $pass)
Create the SMTP object and connects to the server.
connect
Connect to the server.
auth_types
The authentication types supported by the SMTP server.
auth($user , $pass)
Does the authentication.
print (data)
Send data to the socket connection.
cmd (CMD , @MORE)
Send a command to the server.
response
Returns the code response.
If wantarray returns an ARRAY with the response lines.
last_response
Returns an ARRAY with the response lines.
last_response_msg
The last response text.
last_response_line
The last response line (code and text).
close
QUIT and close the connection.
AUTHOR
Graciliano M. P. <gm@virtuasites.com.br>
COPYRIGHT
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.