Select Code to Download

#!/usr/bin/perl

...
    # Shut down the client's connection when the response is sent.
    $kernel->yield("shutdown");
}

#!/usr/bin/perl

...
        my $response = $ua->request($VAR1->{_request});
        print $VAR1->{_request}->uri."\n";
}

#!/usr/bin/perl

...
__PACKAGE__->columns(All =>qw/test_run_id
                                name
                      /);