Select Code to Download

#! /usr/bin/perl

...
    -> dispatch_to('testSoap')
    -> handle;
exit(0);

package testSoap;
use DBI;
...

1;