Select Code to Download

$VAR1 = bless( {
  '_protocol' => 'HTTP/1.1',
...
    '_uri_canonical' => $VAR1->{'_request'}{'_uri'}
  }, 'HTTP::Request' )
}, 'HTTP::Response' );

$VAR1 = bless( {
  '_previous' => bless( {
...
            }
          ]
        },