sub test {
    my $self = shift();
    my $hash_ref = shift();

...
}