
Hi Renée I changed the script to the following (this is my small test script not the actual OTRS installation) print "$@\n"; if (not $smtp = Net::SMTP::SSL->new('smtp.gmail.com', Port => 465, Debug => 1)) { print "$@\n"; die "Could not connect to mail server\n"; } The output is root@XXXXXXXXXX ~ #./perl_test_email_gmail.pl Net::SMTP::SSL: Bad service '' Could not connect to mail server Regards Kenneth Thorman On Mon, Apr 12, 2010 at 12:32 PM, Renée Bäcker < mailinglisten@renee-baecker.de> wrote:
Kenneth Thorman schrieb:
my $smtp;
if (not $smtp = Net::SMTP::SSL->new('smtp.gmail.com', Port => 465, Debug => 1)) { die "Could not connect to mail server\n"; }
Can you print the value of $@?
my $smtp; if (not $smtp = Net::SMTP::SSL->new('smtp.gmail.com', Port => 465, Debug => 1)) { die "Could not connect to mail server -> $@\n"; }
- Renée
-- Perl-Magazin: http://perl-magazin.de Perl-Nachrichten: http://perl-nachrichten.de
--------------------------------------------------------------------- OTRS mailing list: otrs - Webpage: http://otrs.org/ Archive: http://lists.otrs.org/pipermail/otrs To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/otrs
NEW! ENTERPRISE SUBSCRIPTION - Get more information NOW! http://www.otrs.com/en/support/enterprise-subscription/