Проверка почты средствами perl

#!c:\Perl\bin\perl.exe
 use Mail::POP3Client;
 $pop = new Mail::POP3Client(
 USER =&amp;gt; '',
 PASSWORD =&amp;gt; '',
 HOST =&amp;gt; '',
 PORT =&amp;gt; 110,
 AUTH_MODE =&amp;gt; 'PASS',
 TIMEOUT =&amp;gt; 10);
 print "В вашем почтовом ящике ",$pop-&amp;gt;Count()," сообщений.\n"

#!c:\Perl\bin\perl.exe

use Mail::POP3Client;

$pop = new Mail::POP3Client(

USER =&gt; '',

PASSWORD =&gt; '',

HOST =&gt; '',

PORT =&gt; 110,

AUTH_MODE =&gt; 'PASS',

TIMEOUT =&gt; 10);

print "В вашем почтовом ящике ",$pop-&gt;Count()," сообщений.\n"

Виталий Скальный

дневник программиста

Проверка почты средствами perl