Venerable Monks,
I’m new to Perl and I’ve just learned about the wonders of WWW::Mechanize, so I tried to write an example code.
I tried posting a comment on my blog:
http://www.attorneycar.com/what-to-do-in-a-car-accident/
Firstly I read the form fieds with mech-dump:
$ mech-dump “http://www.attorneycar.com/what-to-do-in-a-car-accident/”
GET http://www.attorneycar.com/index.php
s=search this site… (text)POST http://www.attorneycar.com/wp-comments-post.php
author= (text) email= (text) url= (text) comment= (textarea) submit=Submit Comment (submit) comment_post_ID=37 (hidden readonly)Then I wrote the following code:
#!/usr/bin/perl
use WWW::Mechanize;
my $url;
my $m = WWW::Mechanize->new(autocheck => 1);
my $response;
use WWW::Mechanize;
$url = ‘http://www.attorneycar.com/what-to-do-in-a-car-accident/’;
$m->get($url);
$m->field(‘author’, ‘test’);
$m->field(‘email’, ‘test@hotmail.com’);
$m->field(‘url’, ‘sasdsadadasd’);
$m->field(‘comment’, ‘sasdsadadasd’);
$response = $m->submit();
print $response->content();
But when I try to run it I get:
$ perl wpress.pl
No such field ‘author’ at /usr/share/perl5/WWW/Mechanize.pm line 1247
Any ideas?
In reply to WWW::Mechanize can't see the fields by rlopes
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |