$| = 1;
use Test::NoWarnings;
use Test::More tests => 32;
use Test::More tests => 27;
use Test::Warn;
BEGIN {
my ( $scrubber, $html, $result, @types, $collapse );
$collapse = 1;
@types = qw(default comment tag staff);
@types = qw(default comment note);
$html = q|
<![CDATA[selfdestruct]]]>
<?php echo(" EVIL EVIL EVIL "); ?> <!-- COMMENT -->
-