Hi,
It seems that MARC::Transform itself is fine, and only its test suite
needs a tiny patch. Nodes containing '#' just need to be quoted.
I attached the patch to this email.
I also wanted to post on
https://rt.cpan.org/Public/Bug/Display.html?id=125307
but it seems unreachable at the moment.
cheers,
tina
diff --git a/t/test.t b/t/test.t
index d742771..387c668 100644
--- a/t/test.t
+++ b/t/test.t
@@ -97,7 +97,7 @@ create :
b : the 600b value
execute : \&reencodeRecordtoUtf8()
---
-condition : $f502a eq "I want #_dbquote_##_dollars_##_dbquote_#"
+condition : \'$f502a eq "I want #_dbquote_##_dollars_##_dbquote_#"\'
create :
f605a : "#_dbquote_#$f502a#_dbquote_# contain a #_dollars_# sign"
---
@@ -549,7 +549,7 @@ $record17->insert_fields_ordered( MARC::Field->new( '501', '', '', 'a' => 'I wan
#print "--init record--\n". $record17->as_formatted;
my $yaml17 = '
---
-condition : $f501a eq "I want #_dbquote_##_dollars_##_dbquote_#"
+condition : \'$f501a eq "I want #_dbquote_##_dollars_##_dbquote_#"\'
create :
f604a : "#_dbquote_#$f501a#_dbquote_# contain a #_dollars_# sign"
';
