while (<$FH>)