Hello,
Warning XML and Perl newbie. I've created a DOM tree from XML::LibXML::SAX::Builder and the structure is roughly as follows:
<Message>
<Body>...Base64_Encoded_Text...</Body>
</Message>
I need to replace the Base64 encode text with its decoded value. So far I've been able to decode the contents of the Body with the following:
.
.
.
my $dom = $generator->execute("exec $opt_hash{sp} \'$opt_dates{start}\
+', \'$opt_dates{end}\'");
my $root = $dom->getDocumentElement;
my @bodies = $root->getElementsByTagName('Body');
for (my $i = 0; $i < scalar(@bodies); $i++) {
print decode_base64($bodies[$i]->getFirstChild->getData);
}
.
.
.
However, I'd like to modify the tree directly and not just the list that gets returned from getElementsByName. Can anyone help?
Thanks,
Jay
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|