- or download this
#! /usr/bin/perl
use strict;
...
open (my $Output, "> $file") or die "Could not write $file";
print $Output $dom->toString();
close ($Output) or die "Could not close generated $file ";
- or download this
<?xml version="1.0"?>
<header>
...
<c>as</c>
</id>
</header>
- or download this
<?xml version="1.0"?>
<header>
...
<c>something</c>
</id>
</header>