in reply to private sub routine
Attribute::Protected should do exactly what you want - assuming what you want is to distinguish between private, protected and public methods....
In Section
Seekers of Perl Wisdom
in reply to private sub routine