From f14472ce8200bfc870cc9bfe69ce3afb43f4b2e3 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Mon, 26 Sep 2016 07:29:09 -0700 Subject: [PATCH] JBAS-1437 Backstage process bib/auth file names update Handle inconsistencies in BS results file naming. * Process files ending in .UTF8 or .MRC * Treat file with name AUTH as new/modified authority records. Signed-off-by: Bill Erickson --- KCLS/backstage/process-backstage-files.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/KCLS/backstage/process-backstage-files.pl b/KCLS/backstage/process-backstage-files.pl index 7fb0aee709..de0fa646b4 100755 --- a/KCLS/backstage/process-backstage-files.pl +++ b/KCLS/backstage/process-backstage-files.pl @@ -153,7 +153,7 @@ sub process_zip_file { # Avoid processing XLS and HTM files. # All of the MARC files end in .UTF8. - for my $member ($zip->membersMatching('.*\.UTF8')) { + for my $member ($zip->membersMatching('.*(\.UTF8|\.MRC)')) { my $basename = basename($member->fileName()); @@ -175,7 +175,7 @@ sub process_zip_file { handle_deleted_auths($marc_batch); - } elsif ($basename =~ /CHG|NEW/) { + } elsif ($basename =~ /CHG|NEW|AUTH/) { handle_modified_auths($marc_batch); -- 2.11.0