Generate[.pl]
pm/Foo.pm
pm/Bar.pm
####
use Foo;
use Bar;
####
ServerDude-2:/www/cgi/jenny rip$ ./Generate types
Subroutine LWXBar redefined at pm/Bar.pm line 73.
Undefined subroutine &Foo::LWXBar called at pm/Foo.pm line 116.
ServerDude-2:/www/cgi/jenny rip$
####
ServerDude-2:/www/cgi/jenny rip$ ./Generate types
Undefined subroutine &main::LWXBar called at ./Generate line 89.
ServerDude-2:/www/cgi/jenny rip$
####
ServerDude-2:/www/cgi/jenny rip$ ./Generate types
Undefined subroutine &Bar::LWXBar called at ./Generate line 89.
####
BEGIN {
use Exporter ();
our ($VERSION, @ISA, @EXPORT);
# set the version for version checking
$VERSION = "01.f";
@ISA = qw(Exporter);
@EXPORT = qw(&GeneratorConfig &Generate
&GetWidthFromType &GetWidthFromFormat);
}