if ($fi eq "\n")
{
 exit;
}
# some other code here