ID 1 :$VAR1 = bless( {
                 '_request' => bless( {
                                        '_method' => 'GET',
                                        '_headers' => bless( {}, 'HTTP::Headers' ),
                                        '_content' => '',
                                        '_uri' => bless( do{\(my $o = 'https://meine.domain:443/cgi-bin/meinscript.pl?key=val')}, 'URI::https' )
                                      }, 'HTTP::Request' ),
                 '_msg' => 'Service Unavailable',
                 '_content' => '',
                 '_headers' => bless( {}, 'HTTP::Headers' ),
                 '_rc' => 503
               }, 'HTTP::Response' );

1
503