open(FOO, ">c:/gpp/gpp/gpp") or die;