Select Code to Download

use strict;
use warnings;
...

# oh! my birthday, i'm getting older
$hash{'ege'} = "1001";  # oops, just TRIED to add new key.

Attempt to access disallowed key 'ege' in a restricted hash at 
C:\Perl\scripts\hashtest.pl line 14.