Je souhaite par le biais d'un script perl remplir et soumettre un
Formulaire Html ( utilisation proscrite de la souris) ; le formulaire
est essentiellement composé de menu déroulant. Existe t-il de Modules
perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une
piste serait la bienvenue.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Michel Rodriguez
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un Formulaire Html ( utilisation proscrite de la souris) ; le formulaire est essentiellement composé de menu déroulant. Existe t-il de Modules perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
__ Michel Rodriguez Perl & XML http://xmltwig.com
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un
Formulaire Html ( utilisation proscrite de la souris) ; le formulaire
est essentiellement composé de menu déroulant. Existe t-il de Modules
perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une
piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
__
Michel Rodriguez
Perl & XML
http://xmltwig.com
Je souhaite par le biais d'un script perl remplir et soumettre un Formulaire Html ( utilisation proscrite de la souris) ; le formulaire est essentiellement composé de menu déroulant. Existe t-il de Modules perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
__ Michel Rodriguez Perl & XML http://xmltwig.com
onishin
Vouila un bout de code legerement retravaille ! Pour etre plus comprehnesible !
use IO::Socket; use LWP::Simple; use LWP::UserAgent; use HTTP::Cookies; use HTTP::Request::Common qw(POST); use HTML::Entities (); use strict;
#creation du socket et du cookies !!!!!!!!!!!!!! my $ua = LWP::UserAgent->new; $ua = new LWP::UserAgent; $ua->agent("AgentName/0.1 " . $ua->agent); my $cookie_jar=HTTP::Cookies->new;
my $page1 &search("http://lesite.com/le/path/rep_form.php","login","pass',"id")
#si sa marche pas parsque falais acceder a la page du formulaire # #my $tmp = &search("http://lesite.com/le/path/form.php","","',"") #my $page1 &search("http://lesite.com/le/path/rep_form.php","login","pass',"id") #Comme ca u recupere le cookie sur la pge du forumulaire et la refered page et tu simule parfaitement le foncitonnement de si tu le faisait a la main #tu peut sauter les securiter si y en a en mettentun sleep , en simulant le User agent de explorer par ex ! etc......
sub search { my ( $url , $login , $pass , $id ) = @_ ; my $request = POST $url, [ user => $login , paswwd => $pass , id => $id , max_reponse => '100' ]; $cookie_jar->add_cookie_header($request) ; my $res = $ua->request($request); if ($res->is_success) { $cookie_jar->extract_cookies($res); print $res->Content; return $res->Content; } else { print "Erreur chargement Page"; }; }
"Michel Rodriguez" a écrit dans le message de news:bhsogl$2ga$
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un Formulaire Html ( utilisation proscrite de la souris) ; le formulaire est essentiellement composé de menu déroulant. Existe t-il de Modules perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
__ Michel Rodriguez Perl & XML http://xmltwig.com
Vouila un bout de code legerement retravaille !
Pour etre plus comprehnesible !
use IO::Socket;
use LWP::Simple;
use LWP::UserAgent;
use HTTP::Cookies;
use HTTP::Request::Common qw(POST);
use HTML::Entities ();
use strict;
#creation du socket et du cookies !!!!!!!!!!!!!!
my $ua = LWP::UserAgent->new;
$ua = new LWP::UserAgent;
$ua->agent("AgentName/0.1 " . $ua->agent);
my $cookie_jar=HTTP::Cookies->new;
my $page1 &search("http://lesite.com/le/path/rep_form.php","login","pass',"id")
#si sa marche pas parsque falais acceder a la page du formulaire
#
#my $tmp = &search("http://lesite.com/le/path/form.php","","',"")
#my $page1 &search("http://lesite.com/le/path/rep_form.php","login","pass',"id")
#Comme ca u recupere le cookie sur la pge du forumulaire et la refered page
et tu simule parfaitement le foncitonnement de si tu le faisait a la main
#tu peut sauter les securiter si y en a en mettentun sleep , en simulant le
User agent de explorer par ex ! etc......
sub search {
my ( $url , $login , $pass , $id ) = @_ ;
my $request = POST $url,
[ user => $login ,
paswwd => $pass ,
id => $id ,
max_reponse => '100'
];
$cookie_jar->add_cookie_header($request) ;
my $res = $ua->request($request);
if ($res->is_success) {
$cookie_jar->extract_cookies($res);
print $res->Content;
return $res->Content;
} else {
print "Erreur chargement Page";
};
}
"Michel Rodriguez" <newsguy@xmltwig.com> a écrit dans le message de
news:bhsogl$2ga$1@news-reader2.wanadoo.fr...
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un
Formulaire Html ( utilisation proscrite de la souris) ; le formulaire
est essentiellement composé de menu déroulant. Existe t-il de Modules
perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une
piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
__
Michel Rodriguez
Perl & XML
http://xmltwig.com
Vouila un bout de code legerement retravaille ! Pour etre plus comprehnesible !
use IO::Socket; use LWP::Simple; use LWP::UserAgent; use HTTP::Cookies; use HTTP::Request::Common qw(POST); use HTML::Entities (); use strict;
#creation du socket et du cookies !!!!!!!!!!!!!! my $ua = LWP::UserAgent->new; $ua = new LWP::UserAgent; $ua->agent("AgentName/0.1 " . $ua->agent); my $cookie_jar=HTTP::Cookies->new;
my $page1 &search("http://lesite.com/le/path/rep_form.php","login","pass',"id")
#si sa marche pas parsque falais acceder a la page du formulaire # #my $tmp = &search("http://lesite.com/le/path/form.php","","',"") #my $page1 &search("http://lesite.com/le/path/rep_form.php","login","pass',"id") #Comme ca u recupere le cookie sur la pge du forumulaire et la refered page et tu simule parfaitement le foncitonnement de si tu le faisait a la main #tu peut sauter les securiter si y en a en mettentun sleep , en simulant le User agent de explorer par ex ! etc......
sub search { my ( $url , $login , $pass , $id ) = @_ ; my $request = POST $url, [ user => $login , paswwd => $pass , id => $id , max_reponse => '100' ]; $cookie_jar->add_cookie_header($request) ; my $res = $ua->request($request); if ($res->is_success) { $cookie_jar->extract_cookies($res); print $res->Content; return $res->Content; } else { print "Erreur chargement Page"; }; }
"Michel Rodriguez" a écrit dans le message de news:bhsogl$2ga$
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un Formulaire Html ( utilisation proscrite de la souris) ; le formulaire est essentiellement composé de menu déroulant. Existe t-il de Modules perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
__ Michel Rodriguez Perl & XML http://xmltwig.com
root
On Fri, 26 Sep 2003 21:10:51 +0200, onishin wrote:
Vouila un bout de code legerement retravaille ! Pour etre plus comprehnesible !
[CODE]
"Michel Rodriguez" a écrit dans le message de news:bhsogl$2ga$
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un Formulaire Html ( utilisation proscrite de la souris) ; le formulaire est essentiellement composé de menu déroulant. Existe t-il de Modules perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
Je confirme :) WWW::Mechanize ça roxor ! - http://search.cpan.org/author/PETDANCE/WWW-Mechanize-0.60/lib/WWW/Mechanize.pm
On Fri, 26 Sep 2003 21:10:51 +0200, onishin wrote:
Vouila un bout de code legerement retravaille !
Pour etre plus comprehnesible !
[CODE]
"Michel Rodriguez" <newsguy@xmltwig.com> a écrit dans le message de
news:bhsogl$2ga$1@news-reader2.wanadoo.fr...
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un
Formulaire Html ( utilisation proscrite de la souris) ; le formulaire
est essentiellement composé de menu déroulant. Existe t-il de Modules
perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une
piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
Je confirme :) WWW::Mechanize ça roxor !
- http://search.cpan.org/author/PETDANCE/WWW-Mechanize-0.60/lib/WWW/Mechanize.pm
On Fri, 26 Sep 2003 21:10:51 +0200, onishin wrote:
Vouila un bout de code legerement retravaille ! Pour etre plus comprehnesible !
[CODE]
"Michel Rodriguez" a écrit dans le message de news:bhsogl$2ga$
Martin MABIKA wrote:
Je souhaite par le biais d'un script perl remplir et soumettre un Formulaire Html ( utilisation proscrite de la souris) ; le formulaire est essentiellement composé de menu déroulant. Existe t-il de Modules perl pouvant m'aider à resoudre mon problème ? Un debut de code ou une piste serait la bienvenue.
Une piste: WWW::Mechanize est fait pour ce genre de manip.
Je confirme :) WWW::Mechanize ça roxor ! - http://search.cpan.org/author/PETDANCE/WWW-Mechanize-0.60/lib/WWW/Mechanize.pm
