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
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
