(Sub)string is [tle>\n\n\n      \n              \n              <] at C:/Perl/si
te/lib/MozRepl/RemoteObject.pm line 191, <DATA> line 1.
invalid character encountered while parsing JSON string, at character offset 121
 (before "\t\n\t\t\n\t\t<meta ...") at C:/Perl/site/lib/MozRepl/RemoteObject.pm
line 181

##</code><code>##

The code is fairly simple:
$mech = WWW::Mechanize::FireFox->new( autocheck => 1 );
$mech->get( " __fooz__barz__ " );
$mech->follow_link( text => 'View all' );