comparison main-firefox.pl @ 10:83e16df2288a

still experimenting
author Robert McIntyre <rlm@mit.edu>
date Tue, 25 Oct 2011 07:52:02 -0700
parents
children
comparison
equal deleted inserted replaced
9:d09937a6cb4b 10:83e16df2288a
1 #!/usr/bin/perl
2
3 use WWW::Mechanize::Firefox;
4 my $mech = WWW::Mechanize::Firefox->new();
5 $mech->get('http://google.com');
6
7 $mech->eval_in_page('alert("Hello Firefox")');
8 my $png = $mech->content_as_png();