如何从哈希引用中获取键和值？

Question

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

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

};

我想获取密钥和值。

我该怎么做？

Answer 1

欢迎使用StackExchange。

你应该阅读函数each（迭代所有键/​​值对），keys（返回所有键的数组）和values（...你可以在名为perlfunc的perldoc页面中猜出来。例如：

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