open (READ, "../sub/oldfiles/$file") or die "could not open ../sub/oldfiles/$file $!";