open FH, "test.xml"; while (<FH>) { next if ($_ =~ /\<INFO/ig); print $_; } [download]
In reply to Re: parsing xml by perl_addict in thread parsing xml by pinnacle