if ($fi eq "\n") ## WRONG in this case
{
 exit;
}