package classA;
sub something (classA $self) { ... }