Add integration test replace_all (#251)

Author: dr0i

metafix/src/test/resources/org/metafacture/metafix/integration/method/fromXml/toJson/replace_toUpper/expected.json

@@ -0,0 +1 @@
+[]

metafix/src/test/resources/org/metafacture/metafix/integration/method/fromXml/toJson/replace_toUpper/input.xml

@@ -0,0 +1,11 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<collection xmlns="http://www.loc.gov/MARC21/slim">
+    <record>
+        <datafield tag="700" ind1="1" ind2=" ">
+            <subfield code="a">COLEMAN, Julie</subfield>
+            <subfield code="e">Editor</subfield>
+            <subfield code="a">KAY, Christian J.</subfield>
+            <subfield code="e">NS</subfield>
+        </datafield>
+    </record>
+</collection>

metafix/src/test/resources/org/metafacture/metafix/integration/method/fromXml/toJson/replace_toUpper/test.fix

@@ -0,0 +1,25 @@
+set_array("contribution[]")
+
+do list(path:"700[01] ", "var":"$i")
+  unless exists("$i.M")
+    unless exists("$i.4")
+      add_field("$i.4","ctb")
+    end
+    do list(path: "$i.4", "var":"$j")
+      set_hash("contribution[].$append.agent")
+      do list(path:"$i.0","var":"$k")
+        if all_match("$k", "^\\(DE-588\\).*$")
+          paste("contribution[].$last.agent.gndIdentifier","$k")
+          paste("contribution[].$last.agent.id","$k")
+        end
+      end
+      copy_field("$i.a","contribution[].$last.agent.label")
+      set_array("contribution[].$last.agent.type[]","Person")
+      copy_field("$j","contribution[].$last.role.id")
+    end
+  end
+end
+
+set_array("contribution[].*.type[]", "Contribution")
+replace_all("contribution[].*.agent.id","^\\(DE-588\\)(.*$)","https://d-nb.info/gnd/$1")
+replace_all("contribution[].*.agent.label","(?<!\\p{Upper})\\.$|[,]$","")

metafix/src/test/resources/org/metafacture/metafix/integration/method/fromXml/toJson/replace_toUpper/test.flux

@@ -0,0 +1,8 @@
+FLUX_DIR + "input.xml"
+|open-file
+|decode-xml
+|handle-marcxml
+|fix(FLUX_DIR + "test.fix")
+|encode-json(prettyPrinting="true")
+|write(FLUX_DIR + "output-metafix.json")
+;