A sometimes used technique is to use caller to distinguish between command line invocation as a script and use as a module:

package DualUseScript;

...

return 1 if caller;

# script "main" code
[download]