use strict;
use warnings;

use Test::More;
eval { use Test::Pod::Coverage qw( no_plan ); };
if( @$ ){
  plan skip_all
    => 'Test::Pod::Coverage required for testing POD coverage';
}
# ...

##</code><code>##

=head1 NAME

=head1 SYNOPSIS

=head1 DESCRIPTION

=head2 Methods

=over20

=item new()

=item isValid()

=item getFoo()

=item setFoo()

=item getBar()

=item setBar()

=item _validateBaz

=item _validateFred

=back

=head1 AUTHOR

=head1 BUGS

=head1 ACKNOWLEDGEMENTS

=head1 SEE ALSO

=cut

##</code><code>##

s**lil*;  $*=join'',sort split q**;  s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)