Add documentation for default UNIVERSAL methods
[p5sagit/p5-mst-13.2.git] / perlsh
diff --git a/perlsh b/perlsh
index 4f9b5dd..2b2cccd 100644 (file)
--- a/perlsh
+++ b/perlsh
@@ -6,7 +6,7 @@
 # Note that it must be a complete perl statement--don't type double
 #  carriage return in the middle of a loop.
 
-$/ = '';       # set paragraph mode
+$/ = "\n\n";   # set paragraph mode
 $SHlinesep = "\n";
 while ($SHcmd = <>) {
     $/ = $SHlinesep;