sub _ss {
  my ($self, $hashref) = @_;

  my %hash = %$hashref;

  print Dumper(\%hash);

  # do stuff with %hash

}