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

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";
}