1package autovivification::TestRequired1; 2 3my $x = $main::blurp->{r1_main}->{vivify}; 4 5eval 'my $y = $main::blurp->{r1_eval}->{vivify}'; 6 71; 8