## name No code
## failures 0
## cut
=pod

=head1 NO CODE IN HERE

=cut

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

## name No POD
## failures 0
## cut
#!/usr/bin/perl
print 'Hello World';

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

## name Missing many sections
## failures 10
## cut
#!/usr/bin/perl

print 'Hello World';

__END__

=head1 NAME

Blah...

=head1   DESCRIPTION

Blah...

=head1 USAGE

Blah...

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

## name No shebang, this is a library
## failures 8
## cut
#No shebang, this is a library
#POD is inline with code too

=head1 NAME

Blah...

=head1  DESCRIPTION

Blah...

=cut

print 'Hello World';

=head1  SUBROUTINES/METHODS

Blah...

=cut

sub foobar {}

=head1 AUTHOR

Santa Claus

=cut

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

## name Passing parms, for a library
## failures 0
## parms {lib_sections => 'mi nombre | el descripcion'}
## cut

print 'Hello World';

__END__

=head1 MI NOMBRE

Blah...

=head1 EL DESCRIPCION

Blah...

=cut

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

## name Passing parms, for a program
## failures 0
## parms {script_sections => 'mi nombre | el descripcion'}
## cut
#!/usr/bin/perl

__END__

=head1 MI NOMBRE

Blah...

=head1 EL DESCRIPCION

Blah...

=cut

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

## name Disable with annotation, for a library (RT #59268)
## failures 0
## cut

print 'Hello World';

## no critic (RequirePodSections)

__END__

=head1 MI NOMBRE

Blah...

=head1 EL DESCRIPCION

Blah...

=cut

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

## name Disable with annotation, for a program (RT #59268)
## failures 0
## cut
#!/usr/bin/perl

## no critic (RequirePodSections)

__END__

=head1 MI NOMBRE

Blah...

=head1 EL DESCRIPCION

Blah...

=cut

##############################################################################
#      $URL: http://perlcritic.tigris.org/svn/perlcritic/trunk/distributions/Perl-Critic/t/Documentation/RequirePodSections.run $
#     $Date: 2010-07-12 16:10:51 -0700 (Mon, 12 Jul 2010) $
#   $Author: wyant $
# $Revision: 3881 $
##############################################################################

# Local Variables:
#   mode: cperl
#   cperl-indent-level: 4
#   fill-column: 78
#   indent-tabs-mode: nil
#   c-indentation-style: bsd
# End:
# ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :
