Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
        # Shut down the client's connection when the response is sent.
        $kernel->yield("shutdown");
    }
    
  2. or download this
    #!/usr/bin/perl
    
    ...
            my $response = $ua->request($VAR1->{_request});
            print $VAR1->{_request}->uri."\n";
    }
    
  3. or download this
    #!/usr/bin/perl
    
    ...
    __PACKAGE__->columns(All =>qw/test_run_id
                                    name
                          /);