in reply to standard perl module and BEGIN block.
The BEGIN block looks useless to me. Its only important effect in the first version is to limit the scope of the variables declared with our. In the second version it does nothing useful.
On our vs use vars, I do not consider vars obsolete. What it does it does better than our does. See Why is 'our' good? for more detail on why I think that.
The parens after Exporter is a subtle micro-optimization, they avoid calling Exporter::import when it will be doing nothing. You can do it if you want - it certainly doesn't hurt - but I usually don't worry about things like that unless performance is a known problem.
I'd suggest a template that looks something like this:
Note the trick of putting the special variables before strict.pm, eliminating any need to bother declaring them.package Foo; use Exporter; @ISA = qw(Exporter); @EXPORT_OK = qw(); # Exportable things go here $VERSION = 0.01; use strict; # Functions etc go here. 1; __END__ =head1 NAME Foo.pm - What is it? =head1 SYNOPSIS use Foo; # Do something with it. =head1 DESCRIPTION Yada, yada. =head1 EXAMPLES =head1 AUTHOR
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: standard perl module and BEGIN block.
by BrowserUk (Patriarch) on Aug 16, 2004 at 19:35 UTC | |
by tilly (Archbishop) on Aug 16, 2004 at 21:18 UTC | |
by BrowserUk (Patriarch) on Aug 16, 2004 at 21:47 UTC | |
by eric256 (Parson) on Aug 17, 2004 at 06:35 UTC | |
by BrowserUk (Patriarch) on Aug 17, 2004 at 10:55 UTC | |
by ikegami (Patriarch) on Jun 12, 2010 at 19:00 UTC | |
by tye (Sage) on Jun 12, 2010 at 16:53 UTC | |
by BrowserUk (Patriarch) on Jun 12, 2010 at 17:31 UTC |