Help for this page

Select Code to Download


  1. or download this
    
    sub match_func {
    ...
    CFlow::loop( \&match_func, $filehandle );
    print "matched $CFlow::match_count records\n";
    
  2. or download this
    
    sub fix_building {
    ...
    
    DBParserThingy::loop ( \&fix_building );