#!/usr/bin/perl

use strict;
use warnings;
use Acme::Comment  type => 'HTML';
use Regexp::Common;

$_ = `cat $0`;

print "Found HTML regex:\n$_\n" for /($RE{comment}{HTML})/g;

<!--
  --
  -->
      die "It's all attributed to human error, Dave\n";
<!--
  --
  -->

print "Ok\n";

__END__
Found HTML regex:
<!--
  --
  -->
      die "It's all attributed to human error, Dave\n";
<!--
  -- 
  -->
It's all attributed to human error, Dave