{ my @values; BEGIN { @values = ( 1 .. 3 ); } sub _test { # ... } }