Select Code to Download

perl -MDBUtil -e 'clone(arg1 arg2 arg3)'

or

perl -MDBUtil -e 'clone(@ARGV)' arg1 arg2 arg3

#!/usr/bin/perl

...
sub main {
    # blah
}

#!/usr/bin/perl
use DBUtil;
clone(@ARGV)