
12.11.2008, 21:00
|
|
Members of Antichat - Level 5
Регистрация: 15.06.2008
Сообщений: 941
Провел на форуме: 5111568
Репутация:
2399
|
|
О!
установил вроде..) скачал новий перл и установил..
ppm.bat:
проверка IO::Socket:
Verifying IO-Socket-Socks ...
3 files verified
как я понямаю, я устанил...
запускаю скрипт с надеждой, и ..... пля! опять ошибка:
Can't locate IO/Socket/Socks.pm in @INC (@INC contains: C:/Perl/site/lib C:/Perl
/lib .) at D:\pr0gramm1n9\perl\my\proxy\_proxy.pl line 3.
BEGIN failed--compilation aborted at D:\pr0gramm1n9\perl\my\proxy\_proxy.pl line
3.
что такое?
================================
переделал скрипт
Код:
system('cls');
print '1';
use IO::Socket::Socks;
print '1';
my $proxy_addr = "128.10.10.15";print '1';
my $proxy_port = 3128;print '1';
my $conn_addr = "http://www.mail.ru/";print '1';
my $conn_port = 80;print '1';
my $socks = new IO::Socket::Socks(ProxyAddr=>$proxy_addr,
ProxyPort=>$proxy_port,
ConnectAddr=>$conn_addr,
ConnectPort=>$conn_port,
) or die "Can't create Sock: $!";
print '1';
print $sock "GET ",$conn_addr," HTTP/1.0\n\n";
print '1';
while($line = <$sock>) {
print '1';
print $line;
print '1';
}
$socks->close();
print '1';
теперь ошибка:
Can't create Sock: Unknown error at D:\pr0gramm1n9\perl\my\proxy\_proxy.pl line
10.
111111
что я не так делаю?
Последний раз редактировалось eLWAux; 12.11.2008 в 21:29..
|
|
|