FreeCap и Perl скрипты

Discussion in 'Безопасность и Анонимность' started by ALIM, 22 Feb 2011.

  1. ALIM

    ALIM Member

    Joined:
    20 Apr 2010
    Messages:
    60
    Likes Received:
    6
    Reputations:
    5
    Обыскал весь инет, нигде не нашёл конкретного ответа на вопрос. Как соксофицировать перл скрипты?

    1)Например я запускаю скрипт через командную строку, добавляю ком. строку в freecap-не работает. Скрипт не запускается.
    2)Добавляю файл с:/webservers/usr/bin/perl.exe работает, но не через сокс.

    Конечно проще просто прописать в самом скрипте использование сокса. Но и на этот вопрос конкретного ответа я не нашёл. Если кто-нибудь ответит хоть на один вопрос буду благодарен. Вот простейший пример:

    PHP:
    #!/usr/bin/perl   
    use LWP::UserAgent;
    use 
    HTTP::Cookies;
    my $ua LWP::UserAgent->new;
    $ua->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.0.19) Gecko/2010031422 Firefox/3.0.19");
    my $cookie HTTP::Cookies->new();
    $ua->cookie_jar($cookie);
    my $search $ua->get('http://google.com')->content;
    open(OUT">> 1.html"); 
    print 
    OUT "$search\r\n"
    close(OUT);
     
  2. neofit

    neofit Member

    Joined:
    14 Nov 2009
    Messages:
    228
    Likes Received:
    14
    Reputations:
    0
    Тебе Proxifier весь траф соксофичирует...
     
  3. ALIM

    ALIM Member

    Joined:
    20 Apr 2010
    Messages:
    60
    Likes Received:
    6
    Reputations:
    5
    перл скрипты ч-з него не идут, выдаёт ошибку.
     
  4. HIMIKAT

    HIMIKAT Elder - Старейшина

    Joined:
    12 Jan 2007
    Messages:
    2,709
    Likes Received:
    580
    Reputations:
    403
    Впн? Дед? Если уж соксы не канают.
     
  5. red_joker

    red_joker New Member

    Joined:
    4 Nov 2010
    Messages:
    32
    Likes Received:
    3
    Reputations:
    0
    Под никсами канает http://proxychains.sourceforge.net/ , в том числе для перл-скриптов.
    Для LWP::UserAgent, судя по perldoc, напрямую можно использовать только http-прокси
    PHP:
    $ua->proxy($scheme$proxy_url)
      
    #Set/retrieve proxy URL for a scheme:
        
    $ua->proxy(['http''ftp'], 'http://proxy.sn.no:8001/');
        
    $ua->proxy('gopher''http://proxy.sn.no:8001/');
    На цпане есть модуль для цепочки Net::SC и производный от него LWP::protocol::http::SocksChain, после его установки LWP можно юзать через сокс/цепочку.

    ЗЫ. Писать на перле под винду - изврат :)
     
Loading...