Select Code to Download

use strict;
use warnings;
use Data::Dumper;
...
$foo{+length} = 42;
$foo{length} = 'interminable';
print Dumper \%foo;

Use of uninitialized value $_ in hash element at test.pl line 5.
$VAR1 = {
          '' => 42,
          'length' => 'interminable'
        };