Bug 26265: (QA follow-up) Remove g option from regex, add few dirs
[koha-equinox.git] / serials / lateissues-export.pl
index 0bd82a6..e36e734 100755 (executable)
@@ -57,7 +57,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;
 }