make repeatable field uppercase

diff --git a/public/code/casopisi_naslov.casopis_uc.pl b/public/code/casopisi_naslov.casopis_uc.pl
new file mode 100644 (file)
index 0000000..6934293
--- /dev/null
+++ b/public/code/casopisi_naslov.casopis_uc.pl
@@ -0,0 +1,3 @@
+foreach my $v ( @{ $row->{casopisi_naslov} } ) {
+ push @{ $update->{casopis_uc} }, uc $v;
+}