Mercurial > org-tools

annotate main-firefox.pl @ 10:83e16df2288a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
still experimenting
author Robert McIntyre <rlm@mit.edu>
date Tue, 25 Oct 2011 07:52:02 -0700
parents
children
rev   line source
rlm@10 1 #!/usr/bin/perl
rlm@10 2
rlm@10 3 use WWW::Mechanize::Firefox;
rlm@10 4 my $mech = WWW::Mechanize::Firefox->new();
rlm@10 5 $mech->get('http://google.com');
rlm@10 6
rlm@10 7 $mech->eval_in_page('alert("Hello Firefox")');
rlm@10 8 my $png = $mech->content_as_png();