if ( $LINEREC[0] eq $LINEREC[1])
{
print $LINEREC[0];
{