Bug 18536: [QA Follow-up] Tiny regex simplification
[koha.git] / serials / lateissues-export.pl
index ab524ea..d877933 100755 (executable)
@@ -56,7 +56,7 @@ while ( $content =~ /
     $header =~ s/^\s+|\s+$//g; # Trim whitespaces
     push @headers, $header;
 
-    $field =~ s/[^\.]*\.{1}//; # Remove the table name if exists.
+    $field =~ s/[^.]+\.//; # Remove the table name if exists.
     $field =~ s/^\s+|\s+$//g; # Trim whitespaces
     push @fields, $field;
 }