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 <berickxx@gmail.com>

diff --git a/KCLS/backstage/process-backstage-files.pl b/KCLS/backstage/process-backstage-files.pl
index 7fb0aee..de0fa64 100755 (executable)
--- 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);