sub match_func {
  return 0 unless $bytes > 5000;
  return 0 unless $src_port == 80;
  # do_something with matched
  return 1;
}

CFlow::loop( \&match_func, $filehandle );
print "matched $CFlow::match_count records\n";