$ = IO::Socket::INET::_error(ref(Net::SMTP::SSL), '', '') called from file `/System/Library/Perl/5.8.8/IO/Socket/INET.pm' line 111<br>
$ = IO::Socket::INET::configure(ref(Net::SMTP::SSL), ref(HASH)) called from file `/System/Library/Perl/Extras/5.8.8/IO/Socket/SSL.pm' line 97<br>
$ = IO::Socket::SSL::configure(ref(Net::SMTP::SSL), ref(HASH)) called from file `/System/Library/Perl/5.8.8/darwin-thread-multi-2level/IO/Socket.pm' line 48<br>
$ = IO::Socket::new('Net::SMTP::SSL', 'PeerAddr', 'smtp.gmail.com', 'PeerPort', 465, 'LocalAddr', undef, 'LocalPort', undef, 'Proto', 'tcp', 'Timeout', 120) called from file `/System/Library/Perl/5.8.8/IO/Socket/INET.pm' line 32<br>
$ = IO::Socket::INET::new('Net::SMTP::SSL', 'PeerAddr', 'smtp.gmail.com', 'PeerPort', 465, 'LocalAddr', undef, 'LocalPort', undef, 'Proto', 'tcp', 'Timeout', 120) called from file `/Library/Perl/Updates/5.8.8/Net/SMTP.pm' line 41<br>
$ = Net::SMTP::new('Net::SMTP::SSL', 'smtp.gmail.com', 'Port', 465, 'Debug', 0) called from file `/Library/Perl/5.8.8/Email/Send/Gmail.pm' line 37<br>
. = Email::Send::Gmail::send('Email::Send::Gmail', ref(Email::Simple), 'username', 'XXXXXXXX@gmail.com', 'password', 'XXXXXXXX') called from file `/Library/Perl/5.8.8/Email/Send.pm' line 253<br>
. = Email::Send::_send_it(ref(Email::Send), 'Gmail', ref(Email::Simple)) called from file `/Library/Perl/5.8.8/Email/Send.pm' line 167<br>
. = Email::Send::send(ref(Email::Send), ref(Email::Simple)) called from file `./s2.pl' line 26<br>
. = eval {...} called from file `./s2.pl' line 26<p></p>