BEGIN {
    my @values = ( 1 .. 3 );

    sub _test {
        # ...
    }
}