Thread LWP::UserAgent & redirection (2 answers)
Opened by conray at 2011-02-06 21:14

conray
 2011-02-06 21:14
#145407 #145407
User since
2010-02-19
52 Artikel
BenutzerIn
[default_avatar]
Guten Abend,

ich hänge schon den ganzen Tag an einem sicherlich simplen Problem fest.
Undzwar ich habe eine URL die nur auf eine andere URL verweist, redirection eben. Ich brauch eigendlich nur die endgültige URL rausfinden aber das will mir irgendwie nicht gelingen.

Ich habe schon mehrere Ansätze versucht und ergoogled aber entweder mach ich es grundlegend falsch odr es ist ein Verständnisproblem :P

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
                #my $content = $ua->get("http://download.serienjunkies.org/go-$1");#->content();
                #my $tmp = $ua->request($content);
                #print $tmp->as_string;
                
                #my $res = $ua->request->$link;
                #print $res;    
                # my $req1 = HTTP::Request->new(GET => $link);
                # $req1->header('Accept' => 'text/html');
                # my $res1 = $ua->request($req1);
        # print $res1->as_string;
                


                my $request = HTTP::Request->new('GET', $link);
                my $response = $ua->request($request);
                print $response->header_as_string;#("Location");
        


                #my $content = HTTP::Request->new(GET => $link);
                #my $res = $ua->request($content);
                #print $content."\n";
                #my $res = $content->content();
                #print $res."\n";
                
                        
                #push @urls, $url;


Ja es ist im moment eher smellcode aber ich suche ja Prinzipiell erstmal nach einer Lösung und habe auch nocht nicht wirklich viel erfahrung in Sachen Netzwerkprogrammierung und Useragents etc ;)

Wäre einer von euch so freundlich mir zu helfen den Knoten in meinem Kopf zu lösen?^^

Das ganze soll mal ein Plugin für Tuxload werden falls das jemand kennt.

mfG
conray

View full thread LWP::UserAgent & redirection