perl - 別のスクリプトからハッシュ参照キーと値を取得する

Question

こんにちは、script.pl などからパラメータを取得するサブモジュールを持つモジュールがあります。script.pl では、moduleName::sunName(\%hashref) のように関数を呼び出します。
モジュールとサブボディで、渡されたパラメーターを出力したいと思います。また、この href の各キーの値が 0 ではなく空の print '-' であるかどうかを確認したいと思います。モジュールの最初の部分:

sub printOptions {

   my $opt = shift;
   # I have this
   print $opt->{'id'};
   # But I need all parameters!
 }

ありがとう

Answer 1

試す：

sub printOptions {
  my $opt = shift @_;

  for my $key ( sort keys %$opt ){
    if( defined( $opt->{$key} )){
      print "$key: $opt->{$key}\n";
    }else{
      print "$key: undef\n";
    }
  }
}