diff --git a/Source/Modules/perl5.cxx b/Source/Modules/perl5.cxx
index 0e3c94e18..4d1542763 100644
--- a/Source/Modules/perl5.cxx
+++ b/Source/Modules/perl5.cxx
@@ -726,7 +726,7 @@ public:
 	   "XSRETURN(argvi);\n",
 	   "fail:\n",
 	   cleanup,
-	   "croak(Nullch);\n"
+	   "croak(\"\");\n"
 	   "XSRETURN(0);\n"
 	   "}\n",
 	   "}\n",