bon je dois etre debile car cette question a ete pose des centaines de fois mais malgre toutes mes recherches je n'arrive pas a resoudre mon probleme...![]()
je voudrais faire le post de (cette page) par un programme perl :
voici mon code et je ne comprends pas pourquoi il ne marche pas :
en fait le $response->content ne m'affiche pas la page de redirection qui s'affiche quand on fait post...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 my ($addr,$ua,$response); $addr = "http://fpvigneau.dyndns.org/test/test.php"; my $ua = LWP::UserAgent->new; $ua->proxy(['http'], 'http://proxy:80/'); $response = $ua->request(POST 'http://fpvigneau.dyndns.org/test/test.php', Content_Type => 'text/html; charset=iso-8859-1', Content => { "rep" => "oui", }); print $response->status_line."\n"; print $response->content."\n";
Partager