elsif( $f eq 8) { print OUT "\n"; $f=0;}