## 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

#-----------------------------------------------------------------------------