[perl] redirect check

[Verwijderd]

[probleem]
Voor een brochure aanvraag script moet ik redirecten naar een url van een verzend-bedrijf, zodat zij de aanvraag automatisch kunnen verwerken. Alleen nu heb ik het probleem dat ik meer andressen in mijn mysql database heb dan het verzend-bedrijf. Er zal dus ergens iets niet goed lopen.
Alle adressen worden ontdubbeld.
[/probleem]

Mijn vraag is: Is het mogelijk om te checken of de redirect ook aangekomen is, zodat ik dus kan loggen welke aanvraag behandeld zal gaan worden en welke niet.

Ik hoop dat ik het een beetje duidelijk heb uitgelegd.

[Juup]

Dat zal wel niet kunnen omdat de client die geredirect is dan nog info moet sturen naar de 'oude' server.

[_DeWie_]

Mooiste en best werkende oplossing is om het zelf te posten.
Kun je ook een controle inbouwen of alles ok is.

[BOOTZ]

yep, je kan het beste gewoon zelf alles posten naar die server. de output die je terug krijgt kan je vervolgens checken en terugsturen naar de client.
_{als je een code-voorbeeld wil moet je het ff zeggen}

[Verwijderd]

Op maandag 15 april 2002 08:52 schreef BOOTZ het volgende:
yep, je kan het beste gewoon zelf alles posten naar die server. de output die je terug krijgt kan je vervolgens checken en terugsturen naar de client.
_{als je een code-voorbeeld wil moet je het ff zeggen}

Als je een voorbeeldje hebt heel graag en wederom bedankt voor de reacties.

[Verwijderd]

CPAN.org => HTTP::Request

op cpan.orgkun je meer vinden

Voor voorbeelden zoek je met google

succes

[BOOTZ]

ik gebruik deze code om iets te posten:

code:

use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
use LWP::Simple;

 #create a user-agent (needed to post values)
$ua = LWP::UserAgent->new();
 # create request
my $req = POST 'http://server.com/cgi-bin/script.cgi',
           [ username => 'woei', domain => 'tweakers.net', password => 'bla' ];
 #send out request and get back what the server sent
$content = $ua->request($req)->as_string;

[Verwijderd]

Bedankt,

Jaaap, _deWie_,Bootz en woeitje.
Ik ga er zeker uitkomen zo!!!!

zzzflitzzz