Select Code to Download

use strict;
use warnings;
...
    else {
        print Dumper $res;
    }

$VAR1 = bless( {
                 '_headers' => bless( {
...
                               ],
                 '_method' => 'POST'
               }, 'HTTP::Request' );

$VAR1 = bless( {
                 '_headers' => bless( {
...
                 '_msg' => 'Not a SCALAR reference'
               }, 'HTTP::Response' );