Hola, escribo en esta oportunidad debido a que tengo dificultades al escribir en el archivo .xml que genero, estas son las lineas de código que he logrado:
#!C:/Perl/bin/PERL58~1.EXE -w
use XML::Simple;
$programa="Test1.MiX";
my $xs = new XML::Simple();
open my $XML, '>:encoding(iso-8859-1)', 'archivo5.xml' or die "No se pudo abrir archivo: $!";
print {$XML}
my $ref = $xs->XMLin("<p> <programa> $programa </programa></p>");
my $xml = $xs->XMLout($ref);
print $xml;
exit;
close $XML;
pero lo que necesito que contenga el ...