my $args = {
  arg1 => $arg1,
  arg2 => $arg2,
  arg3 => $arg3,
};
tester($args);
...
sub tester{
  my ($args) = @_;
  ...
}