perl - ハッシュ参照からキーと値を取得するにはどうすればよいですか?

Question

my $data = shift;
warn Dumper $data;    
$VAR1 = {

    'sessid' => '3c18e794b31c46eb0c....',
    'code' => '0',
    'message' => 'Authentication succeeded'

};

キーと値を取得したい。

これどうやってするの？

Answer 1

StackExchange へようこそ。

関数each(すべてのキーと値のペアを反復処理する)、keys(すべてのキーの配列を返す)、およびvalues(これは... 推測できます) というperldocページを参照してくださいperlfunc。例：

while (my ($key, $value) = each %{ $data }) {
  print "key: $key; value: $value\n";
}