This used to strip only the given tags:
$ striptag font div < file.html
but now it strips all tags. Something must have changed on my system. Help.
$ cat striptag
use strict;
use HTML::Parser;
my $parser = HTML::Parser->new( text_h => [ sub { print shift; },"dtext" ]);
$parser->parse_file(*ST DIN);
$ striptag font div < file.html
but now it strips all tags. Something must have changed on my system. Help.
$ cat striptag
use strict;
use HTML::Parser;
my $parser = HTML::Parser->new( text_h => [ sub { print shift; },"dtext" ]);
$parser->parse_file(*ST DIN);
Comment