Help for this page

Select Code to Download


  1. or download this
    use IO::Socket::SSL;
    $socket = IO::Socket::SSL->new(PeerAddr=>"pop.mail.yahoo.com",
    ...
    print $socket "\n";
    sysread ($socket,$ant,180000,0);
    print "$ant\n";
    
  2. or download this
    C:\test>perl yahoo.pl
    Verbonden met 188.125.68.106 op poort 995
    ...
    
            by mx.google.com with ESMTPSA id 1sm114582823eeg.4.2013.12.06.
    +00