- or download this
sub _escapeLiteral {
my $data = $_[0];
...
}
return $data;
}
- or download this
use strict;
use warnings;
...
$Writer->end();
print $Writer->to_string;
- or download this
<root>
<str1>one<two</str1>
...
<str4>Caisse D"Eparge</str4>
<str5>Caisse D'Eparge</str5>
</root>