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

perl-snaks
 2012-05-04 15:46
#158059 #158059
User since
2012-04-19
54 articles
BenutzerIn
[default_avatar]
Hey GwenDragon,
hab für dich extra "ediert" geschrieben und für pq editiert. *grin*.

ich habe den Fehler 401 nicht Authorized nicht mehr.
Ich habe einfach:
$ua->credentials("server.xyz.de:443", "POP3 Server Name", "usr", "psw");

mit:
$ua->credentials('server.xyz.de:443', 'POP3 Server Name', 'usr', 'psw');

ersetzt und es hat funktioniert.

Komm jetzt zu meinem ursprünglichen Problem und zwar, dass ich eine HTML-Seite habe. Diese HTML-Seite enthält ein Input-Feld, in dem man einen Wert gibt. dieser Wert wird in einem URL zusammengebaut. sodass die URL mit dem eingegebenen Wert vom Anwender ausgeführt wird und ein Response zurückgibt.
bei diesem Skript bekomme ich die Fehlermeldung:
"400 URL must be absolute at C://Apache/cgi-bin/test.pl line 52" was mir nichts viel sagt:

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
32
33
print "Content-type:text/html\n\n";

use strict;
#use LWP::Simple; 
use LWP::UserAgent;
use CGI;
use CGI::Carp qw(fatalsToBrowser);

my $cgi  = new CGI;
my $var  = CGI::param('wert');

my $url1 = 'https://server.xyz.de/psp.php'; 
my $url2 = 'wert=$var&save_report=yes' ;


my $ua = LWP::UserAgent->new;
   $ua->agent( "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:11.0) Gecko Firefox/11.0" );
 
   $ua->timeout(10);
   $ua->requests_redirectable(undef); # Redirects ausschalten!
   
   
      
my $response = $ua->post($url);

     
   if ($response->is_success) {
    
          print $response->content; # or whatever
  }
   else {
     die $response->status_line;
   }

Last edited: 2012-05-31 13:25:49 +0200 (CEST)

View full thread LWP und proxy