open (IN, '<', "$startdir/$filename") or die "...";