diff options
author | Dale Evans <dale.evans@mycanadapayday.com> | 2015-12-25 13:07:33 -0800 |
---|---|---|
committer | Dale Evans <dale.evans@mycanadapayday.com> | 2015-12-25 13:07:33 -0800 |
commit | 55a2b31cffdd43d1492ab7f0c3f98f09676b5cd5 (patch) | |
tree | 4837f535f4f681d851268d85e701b33af0d2edca | |
parent | 12da672001a7b21c1c880bce88506acb34c96a67 (diff) | |
download | perl-libnet-55a2b31cffdd43d1492ab7f0c3f98f09676b5cd5.tar.gz |
minor POD error
should close an =over with a =back before starting a new =head1, or you get the following errors from perldoc: POD ERRORS Hey! The above document had some coding errors, which are explained below: Around line 36: You forgot a '=back' before '=head1' Around line 42: =back without =over
-rwxr-xr-x | demos/smtp.self | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/demos/smtp.self b/demos/smtp.self index 8a87274..2929183 100755 --- a/demos/smtp.self +++ b/demos/smtp.self @@ -33,21 +33,20 @@ Display this help text and quit Send the message to C<USERNAME> +=back + =head1 EXAMPLE demos/smtp.self -user foo.bar demos/smtp.self -debug -user Graham.Barr -=back - =cut my $opt_debug = undef; my $opt_user = undef; my $opt_help = undef; GetOptions(qw(debug user=s help)); - exec("pod2text $0") if defined $opt_help; |