open(CORP,"<$path") or die ("Error...: $!");