Hello All,

I am trying to extract text from the HTML using the following code,

[CODE=perl]
use strict;
use HTML::Parser 3.00 ();

my %inside;
my $p;
sub tag
{
}

sub text
{
return if $inside{script} || $inside{style};
print $_[0];
}

open(my $fh, shift) || die;

$p = HTML::Parser->new(api_versio n...