Select Code to Download

'error' => {
      'code' => 'badtoken',
      '*' => 'See http://somehost.got.internal.net/mediawiki/api.php f
+or API usage',
      'info' => 'Invalid token'
}

sub post {
    my $query = shift @_;
...
        print Dumper $client->responseContent();
    }
}

random@gotsvl1140:~> ./LookupsToWiki.pl
$VAR1 = bless( {
...
<title>MediaWiki API help - Monitoring Services</title>
<script>document.documentElement.className = document.documentElement.
+className.replace( /(^|\\s)client-nojs(\\s|$)/, "$1client-js$2" );</s
+cript>
","wgRelevantArticleId":0,"wgRequestId":"WwLj2gr-QFMAAE7vrZwAAAAF","wg
+IsProbablyEditable":false,"wgVisualEditor":... Plenty more html here 
+...