1 files changed, 0 insertions, 15 deletions
diff --git a/contrib/perl5/perlsh b/contrib/perl5/perlsh
deleted file mode 100644
index 63662d6..0000000
--- a/contrib/perl5/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 = $/; $/ = '';
-}