if ( ( whatever ) == 0 ) {
}

##</code><code>##

unless ( whatever ) {
}

##</code><code>##

unless ($. % 5000) {
   print "Processed $. records\n";
   # or, just to let them know
   # print ".";
}