#!perl -w use strict; use WWW::Mechanize; my HTML = <

HTML my $mech = WWW::Mechanize->new(); $mech->update_html($html); $mech->tick(...);