In perldoc perlmod there is a cut-and-paste running start of a new module called Some::Module.
Try it out.

/brother t0mas