Select Code to Download

 'invoke-after-get' => sub {
        my($robot, $hook, $url, $response) = @_;
...
            print "RESPONSE: ". $response->code ."\n";
            print "\n";
        }

C:\Documents and Settings\gecko\Desktop>nc localhost 80
...
Location: http://www.google.com
Content-Length: 0
Content-Type: text/plain

ORIG_URL: 

http://127.0.0.1/cgi-bin/redirect.pl
...
RESPONSE: 200
SIZE: 5799
TITLE: Google

invoke-after-get

...
each GET request.
This means your hook function will see every type of response,
not just successful GETs.