--- trunk/run.pl	2006/11/03 20:21:09	769
+++ trunk/run.pl	2006/11/05 12:28:37	775
@@ -8,7 +8,7 @@
 
 use WebPAC::Common 0.02;
 use WebPAC::Parser 0.08;
-use WebPAC::Input 0.14;
+use WebPAC::Input 0.16;
 use WebPAC::Store 0.14;
 use WebPAC::Normalize 0.22;
 use WebPAC::Output::TT;
@@ -135,6 +135,12 @@
 
 $log->info( "-" x 79 );
 
+my $log_file = 'log';
+
+if (-e $log_file ) {	# && -s $log_file > 5 * 1024 * 1024) {
+	$log->info("moved old log with ", -s $log_file, " bytes to '${log_file}.old'");
+	rename $log_file, "${log_file}.old" || $log->logwarn("can't rename $log_file to ${log_file}.old: $!");
+}
 
 my $estcmd_fh;
 my $estcmd_path = './estcmd-merge.sh';
@@ -480,7 +486,7 @@
 
 
 			if ($validate) {
-				if ( my $errors = $validate->validate_rec( $row, $input_db->dump ) ) {
+				if ( my $errors = $validate->validate_rec( $row, $input_db->dump_ascii ) ) {
 					$log->error( "MFN $mfn validation error:\n",
 						$validate->report_error( $errors )
 					);