@ENV{qw/ one two three /} = qw( foo bar baz ); exec "perl somescript.pl" if fork();