Thread LWP und proxy (52 answers)
Opened by perl-snaks at 2012-04-25 13:04

perl-snaks
 2012-05-04 11:08
#158028 #158028
User since
2012-04-19
54 articles
BenutzerIn
[default_avatar]
Hallo Zusammen,
Das Problem mit lwp besteht leider immer noch. ich war in den letzten Tagen krank und hab nichts gemacht.

ich habe diesen Skript und ich ihn ausführe:
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
28
29
30
31
use strict; 
use LWP::UserAgent;

my $url = "https://server.xyz.de/about.php";
my $pw='123456';
my $us='abcdef';

my $ua = LWP::UserAgent->new;

   
   $ua->timeout(10);
   $ua->requests_redirectable(undef); # Redirects ausschalten!
   
   $ua->credentials("server.xyz.de:443", "POP3", $us, $pw);
      
   $ua->proxy( https  => 'http://my.proxy:8080');
   
   $ua->add_handler("request_send",  sub { shift->dump; return });
   $ua->add_handler("response_done", sub { shift->dump; return });

my $response = $ua->post($url);
   
   
   if ($response->is_success) {
     
     print $response->status_line;
     print $response->decoded_content;  # or whatever
  }
   else {
     die $response->status_line;
   }


bekomme ich :
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
POST https://server.xyz.de/about.php
User-Agent: libwww-perl/6.02
Content-Length: 0
Content-Type: application/x-www-form-urlencoded

(no content)
HTTP/1.1 401 Unauthorized



ACCESS DENIED\n
401 Unauthorized at urlredirect.pl line 46.



die Credential sind richtig. Ich hab die überprüft.
Wo kommt den Fehler her?
Vielen Dank im Voraus.

modedit Editiert von GwenDragon: CODE-Tags berichtigt
Last edited: 2012-05-31 13:23:04 +0200 (CEST)

View full thread LWP und proxy