#!/usr/bin/perl
# An HTML-Stripping Filter.
use strict;
use warnings;
use HTML::Strip::Whitespace qw(html_strip_whitespace);
my $buffer = "";
html_strip_whitespace(
'source' => \*STDIN,
'out' => \*STDOUT,
);
#!/usr/bin/perl
# An HTML-Stripping Filter.
use strict;
use warnings;
use HTML::Strip::Whitespace qw(html_strip_whitespace);
my $buffer = "";
html_strip_whitespace(
'source' => \*STDIN,
'out' => \*STDOUT,
);