in reply to package parameters
package MyPackage; sub import { my $class = shift; print "args: @_\n"; } 1; package Main; use MyPackage qw(arg1 arg2); [download]