convert dd.mm.yyyy to yyyy-mm-dd

diff --git a/public/code/Datum obrade.iso.pl b/public/code/Datum obrade.iso.pl
new file mode 100644 (file)
index 0000000..a46140b
--- /dev/null
+++ b/public/code/Datum obrade.iso.pl
@@ -0,0 +1,6 @@
+foreach my $col ( grep { m/Datum/ } keys %$row ) {\r
+ foreach my $v ( @{ $row->{$col} } ) {\r
+  $v =~ s/(\d\d)\.(\d\d)\.(\d\d\d\d)/$3-$2-$1/;\r
+  push @{ $update->{$col} }, $v;\r
+ }\r
+}\r