X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b24dfcbb7755c7c2d3389185091f951755de463c..c08e4068afb7abc3ce88fc90a1ea3b5dd352d1db:/SL/ZUGFeRD.pm diff --git a/SL/ZUGFeRD.pm b/SL/ZUGFeRD.pm index d4d263565..780122c43 100644 --- a/SL/ZUGFeRD.pm +++ b/SL/ZUGFeRD.pm @@ -45,10 +45,10 @@ sub _extract_zugferd_invoice_xml { my $obj_node = $doc->dereference($any_num); my $content = $doc->decodeOne($obj_node->{value}, 0) // ''; - print "1\n"; + #print "1\n"; next if $content !~ m{load_xml(string => $content) }; return $content if $dom && ($dom->documentElement->nodeName eq 'rsm:CrossIndustryInvoice');