Select Code to Download

#!perl

use strict;
...
sub show {
  print(join(" ", @_, $ua->handlers('response_header', $resp)), "\n");
}

200 OK
1 HASH(0x183657c)
Added:
...
4
200 OK
5