1 files changed, 2 insertions, 3 deletions
diff --git a/perl.c b/perl.c
index 7eb121e088..d818f501e1 100644
--- a/perl.c
+++ b/perl.c
@@ -3126,9 +3126,8 @@ S_open_script(pTHX_ char *scriptname, bool dosearch, SV *sv)
 #endif /* IAMSUID */
     if (!PL_rsfp) {
 	/* PSz 16 Sep 03  Keep neat error message */
-	Perl_croak(aTHX_ "Can't open perl script \"%s\": %s%s\n",
-		CopFILE(PL_curcop), Strerror(errno),
-		".\nUse -S to search $PATH for it.");
+	Perl_croak(aTHX_ "Can't open perl script \"%s\": %s\n",
+		CopFILE(PL_curcop), Strerror(errno));
     }
 }