my $last_payment = 0; if ( ++$payment_count == $numpayments ) { $last_payment = 1 }; #### if ( $last_payment == 1 ) { print "last record\n"; print FH "\n"; }