import all documents

diff --git a/tsv2eprints.pl b/tsv2eprints.pl
index 173007d..62e7521 100755 (executable)
--- a/tsv2eprints.pl
+++ b/tsv2eprints.pl
@@ -53,7 +53,7 @@ our $eprintid = 1;
 
 my $files;
 
-my $mkp_path = "/mnt/share/MKP/ELEKTRONIČKI DOKUMENTI/EL.DOKUMENTI PO BIBLIOBROJU/do18052015/";
+my $mkp_path = "/mnt/share/MKP/ELEKTRONIČKI DOKUMENTI/EL.DOKUMENTI PO BIBLIOBROJU/";
 my $koha_path = "/tmp/koha_ffzg";
 
 open(my $fh, '-|:encoding(UTF-8)', 'find "' . $mkp_path . '" -iname "*.pdf"');
@@ -63,7 +63,7 @@ while(my $full_path = <$fh>) {
        my $file = $1 if $full_path =~ m{/([^/]+)\.pdf}i;
 
        my $file_id;
-       if ( $file =~ m/^(\d+)/ ) {
+       if ( $file =~ m/(\d+)/ ) {
                $file_id = $1;
        } else {
                $file_id = $file;