Help for this page
foreach ($mech->links()) { print "$_<br>"}
$mech->get( $url ); $mech->follow_link( url_regex => qr/Frogs and Toads/i );