example for in-place update

diff --git a/public/code/Botanical references.Botanical references.pl b/public/code/Botanical references.Botanical references.pl
new file mode 100644 (file)
index 0000000..050ab20
--- /dev/null
+++ b/public/code/Botanical references.Botanical references.pl
@@ -0,0 +1,4 @@
+# modify column in-place\r
+foreach my $v ( @{ $row->{'Botanical references'} } ) {\r
+ $row->{'Botanical references'} = [ split(/\s*,\s*/,$v) ]\r
+}\r