perl lock.pl
$VAR1 = {
          'test2' => {
                       'kes' => 2,
                       'key' => 1
                     },
          'test' => {
                      'uhu' => 1,
                      'kes' => 2,
                      'key' => 1
                    }
        };
Attempt to access disallowed key 'uhu' in a restricted hash at lock.pl line 17.