WWW::Mechanize Forms...

[lstacey]

Hi Monks,

I am looking to become familiar with the WWW::Mechanize Module. I am trying to learn how to automate inputs in some fields but dont quite understand why I see different outputs with the following code at different uri....

#!/usr/bin/perl -w
use WWW::Mechanize;
use strict; 

my $mech = WWW::Mechanize->new();
$mech->get("https://www.google.com/");
#$mech->get("https://www.southwest.com/");

print $mech->uri();
print "\n";

my @theForms = $mech->forms();
print $#theForms."\n";  #How many forms are returned in the array


foreach my $form (@theForms) {

        my @inputfields = $form->param;
        foreach my $input (@inputfields){
            print $input."\n";
        }
}

When I navigate to google.com, I get this output listing the size of the form array and the fields within each form object

https://www.google.com/
0
ie
hl
source
biw
bih
q
btnG
btnI
gbv

When I navigate to southwest.com, I get this output telling me there are no forms? Why might this be?

https://www.southwest.com/
-1

Thanks in advance!

[Corion]

Have you looked at the HTML of the respective pages?

When I go to https://www.southwest.com/ with Javascript disabled, I see a comment that the site does not work with Javascript disabled. Maybe the site does not work with browsers that don't support Javascript. See the FAQ on Javascript support of WWW::Mechanize.

[lstacey]

Yep...that's it...I assumed getting the true statement from

print $mech->is_html();

meant that I would be able to use the site. Thank you for your help!

[soonix]

<noscript>
  <meta http-equiv="refresh" content="0;url=/html/errors/javascript_di
+sabled.html">
</noscript>

Well, it is valid HTML after all, isn't it? Just not very Mechanize-friendly…