text ##

##

text

##

##

my $p = HTML::StripScripts::Parser->new({
  Rules => {
    span => sub { my ($filter,$element) = @_;
                    print Dumper $element if $element->{content} =~ /^##

$VAR1 = {
          'content' => 'text',
          'tag' => 'span',
          'attr' => {
                      'style' => 'font-family:Arial'
                    }
        };