Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
}
$insert_sth->finish;
$dbh->disconnect;

Select or download this

 @lines = grep !/^\s*$| Councils?$|^Mapping|^Continuing/, split( /[\r\
+n]+/ );