use strict; use warnings; my %items; eval ("$items{3}{Value} = 2;");