Subversion Repositories VORC

Rev

Rev 64 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 64 Rev 65
Line 33... Line 33...
33 
#    SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE,
 33 
#    SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE,
34 
#  );
 34 
#  );
35 
#  IO::Socket::SSL::set_client_defaults(
 35 
#  IO::Socket::SSL::set_client_defaults(
36 
#    SSL_verifycn_name => 'p3plmcpnl496538.prod.phx3.secureserver.net',
 36 
#    SSL_verifycn_name => 'p3plmcpnl496538.prod.phx3.secureserver.net',
37 
#  );
 37 
#  );
- 
 
 38 
  IO::Socket::SSL::set_client_defaults(
- 
 
 39 
    SSL_verifycn_name => 'smtp.gmail.com',
- 
 
 40 
  );
Line 38... Line 41...
38
41
39 
  my $smtp = Net::SMTPS->new(
 42 
  my $smtp = Net::SMTPS->new(
40 
    $server,
 43 
    $server,
41 
    Hello => 'gmail.com',
 44 
    Hello => 'gmail.com',