summaryrefslogtreecommitdiff
path: root/perlsh
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2013-03-18 14:35:21 +0100
committerNicholas Clark <nick@ccl4.org>2013-05-20 17:21:06 +0200
commit4572fa3eeef0e6fc24d4f16823ed87d5a8e4778b (patch)
tree0500abbee65affa5e498f76b8c98258d841954dd /perlsh
parentdbd04185fe7ac500c7afdd3a78e892e62de3ccc6 (diff)
downloadperl-4572fa3eeef0e6fc24d4f16823ed87d5a8e4778b.tar.gz
Remove perlsh, which is neither installed nor referenced anywhere.
Described as a "poor man's perl shell", it is unreferenced, and virtually unchanged since its addition in perl 2. As it is never installed, it's not used by anyone.
Diffstat (limited to 'perlsh')
-rw-r--r--perlsh15
1 files changed, 0 insertions, 15 deletions
diff --git a/perlsh b/perlsh
deleted file mode 100644
index 63662d6c6a..0000000000
--- a/perlsh
+++ /dev/null
@@ -1,15 +0,0 @@
-#!/usr/bin/perl
-
-# Poor man's perl shell.
-
-# Simply type two carriage returns every time you want to evaluate.
-# Note that it must be a complete perl statement--don't type double
-# carriage return in the middle of a loop.
-
-$/ = "\n\n"; # set paragraph mode
-$SHlinesep = "\n";
-while (defined($SHcmd = <>)) {
- $/ = $SHlinesep;
- eval $SHcmd; print $@ || "\n";
- $SHlinesep = $/; $/ = '';
-}