diff --git a/modules/modperl.cpp b/modules/modperl.cpp
index 85f37bc9..67741994 100644
--- a/modules/modperl.cpp
+++ b/modules/modperl.cpp
@@ -165,6 +165,7 @@ public:
 		if (SvTRUE(ERRSV)) {
 			bSuccess = false;
 			sRetMsg = PString(ERRSV);
+			DEBUG("Perl ZNC::Core::GetModInfo died: " << sRetMsg);
 		} else if (0 < ret) {
 			switch(static_cast<ELoadPerlMod>(SvUV(ST(0)))) {
 				case Perl_NotFound: