about summary refs log tree commit
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2015-12-27 17:51:16 +0000
committerSteve Hay <steve.m.hay@googlemail.com>2015-12-27 17:51:16 +0000
commit2f44c05f300a0a6825ce5d140dd8a05eae47516c (patch)
tree4c8889678060c56289dd8222a277ba8bb1100322
parente73fbd3e36de3699c5caa22b20b65d1c553bfa6e (diff)
parent927cee0f5c385656420152ee5e306f92b47d0229 (diff)
downloadperl-libnet-2f44c05f300a0a6825ce5d140dd8a05eae47516c.tar.gz
Merge pull request #20 from daleevans/patch-1
fix smtp demo program
-rwxr-xr-xdemos/smtp.self6
1 files changed, 3 insertions, 3 deletions
diff --git a/demos/smtp.self b/demos/smtp.self
index 8a87274..8917c25 100755
--- a/demos/smtp.self
+++ b/demos/smtp.self
@@ -43,9 +43,9 @@ Send the message to C<USERNAME>
 
 =cut
 
-my $opt_debug = undef;
-my $opt_user = undef;
-my $opt_help = undef;
+our $opt_debug = undef;
+our $opt_user = undef;
+our $opt_help = undef;
 GetOptions(qw(debug user=s help));
 
 exec("pod2text $0")