#!/usr/local/bin/perl use strict; use warnings; use HTML::Strip; main(); sub main{ my $xml = qq{ <HIT> <FIELD NAME="body"> <sep /> Self-Archiving E-mail Messages in <key>Outlook</key> The following e-mail self-archiving <sep /> create an Archive folder/.pst file. See <key>Outlook</key> 2003 .pst file Management for instruction <sep /> your messages. Select your <key>Files</key> (This refers to your primary... <sep /> </FIELD> </HIT> }; my $hs = HTML::Strip->new(); my $text = $hs->parse($xml); print $text; }
In reply to Re: XML Parsing question
by deMize
in thread XML Parsing question
by chtaylo2
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |