diff --git a/lib/SLUB/LZA/TA/Output.pm b/lib/SLUB/LZA/TA/Output.pm index 03facf59d56702bc3e2bf3fa7956e0b86bed9a13..249e052b8e2f71e913aa1cdabbd226394f7b94d0 100644 --- a/lib/SLUB/LZA/TA/Output.pm +++ b/lib/SLUB/LZA/TA/Output.pm @@ -22,6 +22,7 @@ sub line_result_mapper { LDP-funder LDP-lender LDP-project + Payload-Oxum SLUBArchiv-archivalValueDescription SLUBArchiv-exportToArchiveDate SLUBArchiv-externalId @@ -52,6 +53,7 @@ sub line_result_mapper { if (exists($bid->{ "bim:$t" }) ) { $line{$linekey} = $bid->{ "bim:$t" }; } else { + # use Data::Printer; #say "$t -->"; #say np($tfm); } @@ -61,7 +63,23 @@ sub line_result_mapper { if (defined $opt->{with_filecount}) { $line{filecount} = $partial_result->{_source}->{file_count} }; if (defined $opt->{with_path}) { $line{path}= $partial_result->{_source}->{filePath} }; if (defined $opt->{with_score}) { $line{score} = $partial_result->{_score}} - if (defined $opt->{with_size}) { $line{size}= $partial_result->{_source}->{size} }; + if (defined $opt->{with_size}) { $line{size}= $partial_result->{_source}->{size} * 1024 * 1024 }; + if (defined $opt->{with_payload_size} or defined $opt->{with_payload_filecount}) { + my $payload_oxum = $line{'payload_oxum'}; + my $payload_size = ""; + my $payload_filecount = ""; + if (defined $payload_oxum) { + ($payload_size, $payload_filecount) = split /\./, $payload_oxum; + } + if (defined $opt->{with_payload_size}) { + $line{payload_size} = $payload_size; + } + if (defined $opt->{with_payload_filecount}) { + $line{payload_filecount} = $payload_filecount; + } + delete $line{'payload_oxum'}; + + } return \%line; }