while (defined $line1 = <FILE1>)