You can do it like this using -M to load the module and -e to execute whatever is inside the ' ' . In this case we call clone with the args:

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

or

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

Another option is to add something like this to your module:

#!/usr/bin/perl

package DBUtil;

# run main if called with command line args
# will not execute when called as a module (no cmd line args)
main() if @ARGV;

sub main {
    # blah
}
[download]

More typically you would write a 3 line script that uses your module like this:

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

Then you just call the script. This is analagous to the command line version and is probably the more conventional way to do it.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print