#-*- perl -*- # # Copyright (C) 2001 Ken'ichi Fukamachi # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # # $FML: ESMTP.pm,v 1.4 2001/12/22 09:21:17 fukachan Exp $ # package Mail::Delivery::ESMTP; use strict; use vars qw(@ISA @EXPORT @EXPORT_OK $AUTOLOAD); use Carp; use Mail::Delivery::SMTP; @ISA = qw(Mail::Delivery::SMTP); # Descriptions: constructor. forward the request to base class (SMTP). # Arguments: OBJ($self) HASH_REF($args) # Side Effects: none # Return Value: OBJ sub new { my ($self) = @_; $self->SUPER::new(@_); } =head1 NAME Mail::Delivery::ESMTP - Extended SMTP class =head1 SYNOPSIS use Mail::Message; ... make Mail::Message object ... use Mail::Delivery::ESMTP; $service = new Mail::Delivery::ESMTP; $service->deliver( ... ); See L for more details since this ESMTP class is an adapter for SMTP (super) class for convenience. All requests are forwarded to SMTP super class. =head1 AUTHOR Ken'ichi Fukamachi =head1 COPYRIGHT Copyright (C) 2001 Ken'ichi Fukamachi All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =head1 HISTORY Mail::Delivery::ESMTP appeared in fml5 mailing list driver package. See C for more details. =cut 1;