summaryrefslogtreecommitdiff
path: root/os2/perlsh.cmd
diff options
context:
space:
mode:
Diffstat (limited to 'os2/perlsh.cmd')
-rw-r--r--os2/perlsh.cmd19
1 files changed, 0 insertions, 19 deletions
diff --git a/os2/perlsh.cmd b/os2/perlsh.cmd
deleted file mode 100644
index c583af7099..0000000000
--- a/os2/perlsh.cmd
+++ /dev/null
@@ -1,19 +0,0 @@
-extproc perl -x
-#!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.
-
-print "Perl shell\n> ";
-
-$/ = ''; # set paragraph mode
-$SHlinesep = "\n";
-
-while ($SHcmd = <>) {
- $/ = $SHlinesep;
- eval $SHcmd; print $@ || "\n> ";
- $SHlinesep = $/; $/ = '';
-}