Help for this page
<H1>some text</H1> <NLI>some text</NLI> ... <2NLI>some text</2NLI> <2NLI>some text</2NLI> <aLI>some text</aLI>
<H1>some text</H1> <OL TYPE="1"> ... <OL TYPE="a"> <LI>some text</LI> </OL>
undef $/; %oli = ("NLI" => "OL TYPE\"1\"", "ALI" => "OL TYPE\"A\"", "aLI" => "OL + TYPE\"a\"", "RLI" => "OL TYPE\"I\"", "rLI" => "OL TYPE\"i\""); ... open (FOUT, "> C:\out.txt") || die "can't open"; print FOUT $content;