## name Acceptable Comments
## failures 0
## cut
my $foo = '#XXX';
# this comment is OK
my $XXX = 'foo';
#-----------------------------------------------------------------------------
## name XXX Comments
## failures 1
## cut
# XXX I need to fix this comment
#-----------------------------------------------------------------------------
## name Flags in POD
## failures 1
## cut
=head1 SYNOPSIS
FIXME: needs a description
=over 4
=item one
TODO
=back
=cut
#-----------------------------------------------------------------------------