diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-24 10:43:03 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-24 10:43:03 +0000 |
commit | 6570f7848406340d371b9f81689299e3b739279f (patch) | |
tree | 433c3efc96acdebf51bcb7ce00976ca7e398b8cf /lib/Shell.pm | |
parent | 548da3d2226362a0902abd52eeecaeeaccb0a978 (diff) | |
download | perl-6570f7848406340d371b9f81689299e3b739279f.tar.gz |
fix typos; avoid use constant for lowercase constants (produces
warnings now)
p4raw-id: //depot/perl@4874
Diffstat (limited to 'lib/Shell.pm')
-rw-r--r-- | lib/Shell.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Shell.pm b/lib/Shell.pm index 706216a8e5..62aa82964c 100644 --- a/lib/Shell.pm +++ b/lib/Shell.pm @@ -1,6 +1,6 @@ package Shell; use 5.005_64; -our($capture_stderr $VERSION); +our($capture_stderr, $VERSION); $VERSION = '0.2'; @@ -72,7 +72,7 @@ AUTOLOAD { for (\@arr) { s/"/\\\\"/g; s/\\\\\\\\"/\\\\\\\\"""/g; - \$_ = qq["\$_"] if /\s/; + \$_ = qq["\$_"] if /\\s/; } } else { |