my $foo;
BEGIN { $foo = 20 }