WWW::Mechanize + variabler Proxy - #141947 (Fragen zu Perl-Modulen)

Gast b00n

2010-10-15 20:23

Hallo Leute,

für ein kleines Projekt an der Uni, arbeite ich mich zur Zeit etwas in die Programmiersprache Perl und das nützliche Modul WWW::Mechanize ein.
Nun wollte ich mal die Proxyfunktion von Mechanize testen und hatte leider nicht viel Erfolg mit HTTPS Adressen.
Nach ein bisschen rumgegoogle bin ich über diese Adresse gestolpert (http://www.cpuidle.de/blog/?p=54) und hatte mein Code entsprechend angepasst.

Code (perl): (dl )

#!/ur/bin/perl

use WWW::Mechanize;
use strict;
use warnings;
            
    $mech  = WWW::Mechanize->new( );
    
    $ENV{HTTPS_PROXY} = 'http://proxy';
    
    $req = HTTP::Request->new(GET => 'Adresse');
    $res = $mech->request($req);
        
    print $mech->content();

Das funktioniert schon ganz gut.

Jetzt hab ich jedoch die Frage, ob das alles auch etwas dynamischer gestaltet werden kann?!

Also: Ist es mir möglich nach, meinetwegen, 5

Code: (dl )

print $mech->content();

aufrufen, den Proxyserver zu wechseln und die nächsten 5

Code: (dl )

print $mech->content();

Aufrufe über einen anderen Proxy zu starten ?

Danke schon einmal für eventuell hilfreiche Antworten :)
Last edited: 2010-10-15 21:00:47 +0200 (CEST)