about summary refs log tree commit
path: root/lib/Net/Cmd.pm
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2014-06-11 09:19:48 +0100
committerSteve Hay <steve.m.hay@googlemail.com>2014-06-11 09:19:48 +0100
commite5037c26a5be7d04f43b100db5b6f215786f28ab (patch)
tree0d1c9d93cec6cc3572196581ab4e6175cd6ae08b /lib/Net/Cmd.pm
parent3ffe754d14d144594a9cbca35fd77b7f25a5a285 (diff)
downloadperl-libnet-e5037c26a5be7d04f43b100db5b6f215786f28ab.tar.gz
Add optional POD coverage testing
Diffstat (limited to 'lib/Net/Cmd.pm')
-rw-r--r--lib/Net/Cmd.pm13
1 files changed, 6 insertions, 7 deletions
diff --git a/lib/Net/Cmd.pm b/lib/Net/Cmd.pm
index efa8c07..9bf9f4f 100644
--- a/lib/Net/Cmd.pm
+++ b/lib/Net/Cmd.pm
@@ -45,13 +45,12 @@ our $VERSION = "2.31";
 our @ISA     = qw(Exporter);
 our @EXPORT  = qw(CMD_INFO CMD_OK CMD_MORE CMD_REJECT CMD_ERROR CMD_PENDING);
 
-
-sub CMD_INFO    {1}
-sub CMD_OK      {2}
-sub CMD_MORE    {3}
-sub CMD_REJECT  {4}
-sub CMD_ERROR   {5}
-sub CMD_PENDING {0}
+use constant CMD_INFO    => 1;
+use constant CMD_OK      => 2;
+use constant CMD_MORE    => 3;
+use constant CMD_REJECT  => 4;
+use constant CMD_ERROR   => 5;
+use constant CMD_PENDING => 0;
 
 my %debug = ();