> if(($IN = @fopen($file,'r+')) < 0)
これじゃまだダメだと思う?