in reply to Munging Rendered HTML While Preserving Formatting

I just spotted HTML::HiLiter on cpan. Works pretty good 
use strict;
use warnings;
use HTML::HiLiter;
my $hiliter = HTML::HiLiter::->new;
$hiliter->Queries([
        'foo',
        'bar',
        '"some phrase"',
    ],
);
$hiliter->CSS;
$hiliter->Run(\q~
<html>
<title>hi</title>
<style type="text/css">
.hilite2, .hilite1 { /* so you can see whats hilited */
    color: red !;
}
</style>
<body>hi there I say <b>f<i>o</i>o</b> there <tt>some phrase</tt>
</body></html>
~);
__END__
<html>
<title>hi</title>
<style type="text/css">
.hilite2, .hilite1 { /* so you can see whats hilited */
    color: red !;
}
</style>
<body>hi there I say <b><span class='hilite2'>f</span><i><span class='
+hilite2'>o</span></i><span class='hilite2'>o</span></b> there <tt><sp
+an class='hilite1'>some phrase</span></tt>
</body></html>

[download]

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.

  • Comment on (a solution) Re: Munging Rendered HTML While Preserving Formatting
  • Download Code

In Section Seekers of Perl Wisdom