[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