$foo = 1;
BEGIN { $foo = 2 }