no autovivification;

my @x = ({"aaa" => 100});
say Dumper([grep { $_->{"aaa"} < 4 } @x]->[0]->{"aaa"});

#$VAR1 = undef;