Inheritance.

package Person;

sub eat { ... }
sub drink { ... }


package Alcoholic;

@ISA = qw( Person );
sub drink { ... }
[download]

Here, an Alcoholic object has its own drink method, but it inherits the eat method from Person. Similarly, something that inherits from the class you've posted could have its own _accessible method.

japhy -- Perl and Regex Hacker