perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 27
 Click for quality!



11.02.2012 / 20:49
Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home

PERLscripts

PHPscripts

JAVAscripts

Hilfreiches

Links2www

Newscenter

Community

Interna



Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragLWP und Redirect
 Seitenanfang
Hi,

ich versuche eine Webseite per Post Infos zu übergeben. Dieses funktioniert, aber leider antwortet diese mit einenm 302 Moved temporaly...
Kann ich LWP beibringen diesem temporären Link zu folgen?

hier der Code:

#!/usr/bin/perl

use strict;
use LWP;

my $productNumber = "376236-421";
my $serialNumber = "GBJ617018N";
my $url = 'http://itrc.hp.com/service/ewarrenty/warrentyResults.do';

# LWP initialisieren
my $ua = LWP::UserAgent->new();

# Anfrage an Webservice von HP absetzen
my $resp = $ua->post($url, [ BODServiceID => "NA", RegisteredPurchaseDate => "", country => "DE", produktNumber => $productNumber, serialNumber1 => $serialNumber, serialNumber2 => "", serialNumber2 => "", serialNumber3 => "", serialNumber4 => "", serialNumber5 => "", serialNumber6 => "", serialNumber7 => "", serialNumber8 => "", serialNumber9 => "", serialNumber10 => "", x => "35", y => "14" ]);

thx vicodas

Datum: 27.01.2009-07:53
Beitragre: LWP und Redirect
 Seitenanfang
Nach dem Initialisieren von LWP das hier einfügen:

push @{ $ua->requests_redirectable }, 'POST';

Datum: 27.01.2009-08:30
-






-
 -