sub something {
    my $self_or_parameter = shift;
    if ( ref $self_or_parameter eq __PACKAGE__ ) {
        unshift @_, $self_or_parameter;
    }
     ...
}