"Dan Muey" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > Howdy all!. > > I'm using a simpewlmmodule to get vars an dfunctions into one place. > > It works dandy except I can't have use strict in the module. > > I think it has todo with not doing my or our with teh @EXPORT and friends: > > So what am I missing, what do I need to do to be able to add use stirct; to > my module below and also therefore in my scripts thatuse it? > > package TestMod; > > require Exporter; > @ISA = qw(Exporter); > @EXPORT = qw(TestMod); > @EXPORT_OK = qw($testvar); > > our $testvar = 'Howdy Module'; > sub TestModSub { return "Content-type: text/html\n\n$testvar\n"; } > > ### > perl -e 'use TestMod;print TestModSub();' > > TIA > > Dan
my @ISA = qw(Exporter); my @EXPORT = qw(TestMod); my @EXPORT_OK = qw($testvar); $testvar = 'Howdy Module'; I would have to read up myself on "our" vs "my" but generally I have been told to use "my". Bob -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
