%EXPORT_TAGS question

[Dan Muey]

perldoc Exporter says:

%EXPORT_TAGS = (T1 => [qw(A1 A2 B1 B2)], T2 => [qw(A1 A2 B3 B4)]);

So I am wondering if I can do something like this wilst filling in tags:

%EXPORT_TAGS = (
        T1 => [EMAIL PROTECTED],qw(A1 A2 B1 B2)], 
        T2 => [qw(A1 A2 B3 B4)]),
        T3 => ['joemama','bendover',@stuff,qw(fred wilma)],
        T4 => [EMAIL PROTECTED]
);

And still be giving proper arrays as the value for the keys?

Also , say I wanted:

use Monkey;
to export $EXPORT_TAGS{'T2'} by default along with whatever is in @EXPORT, 
IE use Monkey would be the same as doing use Monkey qw(:T2);

Would I do it this way?
%EXPORT_TAGS = (
        T2 => [qw(A1 A2 B3 B4)]),
        DEFAULT => $EXPORT_TAGS{'T2'},
};

TIA 

Dan

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