in reply to Sending SMTP mail on other than port 25
Looking at Net::SMTP I found the following within sub new
$obj = $type->SUPER::new(PeerAddr => ($host = $h), PeerPort => $arg{Port} || 'smtp(25)', Proto => 'tcp', Timeout => defined $arg{Timeout} ? $arg{Timeout} : 120 ) and last;
Without any further research I would guess that you may try:
my $s = Net::SMTP->new( $host, Port => $port );
alex pleiner <alex@zeitform.de>
zeitform Internet Dienste
|
---|
Replies are listed 'Best First'. | |
---|---|
Re:x2 Sending SMTP mail on other than port 25
by grinder (Bishop) on Apr 26, 2002 at 12:51 UTC |
In Section
Seekers of Perl Wisdom