Perl - 错误"每个arg 1的类型必须是哈希(不是哈希元素)"

Set*_*ins 2 syntax perl hash

尝试运行此脚本时,我收到此错误 - 在此行上

每个arg 1的类型必须是哈希(不是哈希元素)

    while (my ($action, $value) = each($cameras{$camera}{$mode})) {
Run Code Online (Sandbox Code Playgroud)

我该如何解决这个错误?

too*_*lic 5

取消引用哈希:

 while (my ($action, $value) = each(%{ $cameras{$camera}{$mode} })) {
Run Code Online (Sandbox Code Playgroud)