From:                   Nikola Janceski <[EMAIL PROTECTED]>

> I am going through my old code and adding:
> use strict;
> use warnings;
> 
> And I am running into some problems. I created a module (that I know
> works).
> 
> [ snip FILE: TempSorter.pm ]
> ## Packages used
> package TempSorter;
> use Exporter;
> use strict;
> 
> ### GLOBAL VARIABLES
> @ISA = qw(Exporter);
> @EXPORT = qw( wordgroup wordtype releasetype);


There are three solutions:

        use strict;
        @TempSorter::ISA = qw(Exporter);
        @TempSorter::EXPORT = qw( wordgroup wordtype 
releasetype);

or

        use strict;
        use vars qw(@ISA @EXPORT);
        @ISA = qw(Exporter);
        @EXPORT = qw( wordgroup wordtype releasetype);

or

        use strict;
        our @ISA = qw(Exporter);
        our @EXPORT = qw( wordgroup wordtype releasetype);

The last one will only work in Perl 5.6 and newer.

Jenda

=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain.
I can't find it.
                                        --- me

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to