[Madrid-pm] Ran out of memory usando Twig
Francisco Rivas
franciscojrivash en gmail.com
Vie Abr 29 05:33:27 PDT 2011
Hola de nuevo,
Luego de haber corregido los errores sintacticos, gracias de nuevo Rafael,
estoy probando el script y esta fallando :
$ perl modify_xml.pl
Working on ./BAAHeatWidget_15022011_update/BAAHeatWidget_asset.xml
Working on ./BloomberWidget_09022011/BloomberWidget_asset.xml
Working on ./BloomberWidget_11022011_update/BloomberWidget_asset.xml
Working on ./BookatableWid_09022011/BookatableWid_asset.xml
Ran out of memory for input buffer at /usr/lib/perl5/XML/Parser/Expat.pm
line 469.
at modify_xml.pl line 18
at modify_xml.pl line 18
Linea 18 : my $t = XML::Twig->new(pretty_print =>
'indented')->parsefile($file);
Esta linea esta dentro de un foreach loop, dentro de un sub que recibe como
parametro un array con todos los nombres de los archivos que quiero
modificar :
sub modify_xml {
foreach my $file(@files) {
print "Working on ".$file."\n";
my $t = XML::Twig->new(pretty_print => 'indented')->parsefile($file);
my $root = $t->root;
....
}
find(sub { push (@files, $File::Find::name) if -f and /\.xml$/}, at dirs);
&modify_xml(@files);
Gracias de nuevo, de antemano :D
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20110429/a2f5d814/attachment.html>
Más información sobre la lista de distribución Madrid-pm