#!perl -w use WWW::Mechanize::Firefox::DSL; update_html(q{Test no Test}); highlight_node( selector(q{*[href*='/example.com']}));