Select Code to Download

use strict;
use Test::More tests => 2;
...

require 'runWebTest.pl';
runWebTest(\&test, 'sampleHandler.pl');

sub handler {
    my ($r, $c) = @_;
...
}

1;

use strict;
use Config;
...
}

1;

use strict;

...
    $c->close;        
    $c = undef;  # close connection
}