http://qs1969.pair.com?node_id=539267


in reply to Re: XML::Parser ( or Perl internals ) speed mysticism
in thread XML::Parser ( or Perl internals ) speed mysticism

sfink, your right ! This code working fine !
#!/usr/bin/perl use XML::Parser; our $str; my @arr; my $file = shift; my $parser = new XML::Parser:: Handlers =>{ Char => sub { $str .= $_[1]; return; #clear return value } } ; $parser->parsefile($file);