diff options
| author | Todd C. Miller <millert@cvs.openbsd.org> | 1997-11-30 07:49:45 +0000 |
|---|---|---|
| committer | Todd C. Miller <millert@cvs.openbsd.org> | 1997-11-30 07:49:45 +0000 |
| commit | eeacafe7910fb1a4f74af72f94a32acf464b6319 (patch) | |
| tree | 91e47a98a8a5803678d5e634741442debc7cec27 /gnu/usr.bin/perl/perlsh | |
| parent | 700df82d5de7cccb990b704f31bed3b5bc128df6 (diff) | |
perl 5.004_04
Diffstat (limited to 'gnu/usr.bin/perl/perlsh')
| -rw-r--r-- | gnu/usr.bin/perl/perlsh | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/usr.bin/perl/perlsh b/gnu/usr.bin/perl/perlsh index 2b2cccd0641..63662d6c6a1 100644 --- a/gnu/usr.bin/perl/perlsh +++ b/gnu/usr.bin/perl/perlsh @@ -8,7 +8,7 @@ $/ = "\n\n"; # set paragraph mode $SHlinesep = "\n"; -while ($SHcmd = <>) { +while (defined($SHcmd = <>)) { $/ = $SHlinesep; eval $SHcmd; print $@ || "\n"; $SHlinesep = $/; $/ = ''; |