Re: how to strip XML into Plain Text file

in reply to how to strip XML into Plain Text file

perl script.pl file.xml

package MySAXHandler;
use base 'XML::SAX::Base';
sub characters { print $_[1]->{Data}; }
package main;
use XML::SAX;
XML::SAX::ParserFactory->parser( Handler => MySAXHandler->new )
  ->parse_uri(shift);
[download]

Boris

In Section Seekers of Perl Wisdom