$ perl -MHash::AsObject -Mstrictures=2,1 -wE 'my $h = Hash::AsObject->new( foo => "bar" ); say $h->f0o; say 42' Use of uninitialized value in say at -e line 1.