local $ENV{PATH} = '/foo'; system('prog', 'arg');