for my $header ($response->headers->header_field_names) {
        print $header, ": ", $response->header($header), "\n";
}