diff --git a/src/perl/perl-sources.c b/src/perl/perl-sources.c
index f10841ff..4a3fdea6 100644
--- a/src/perl/perl-sources.c
+++ b/src/perl/perl-sources.c
@@ -81,7 +81,6 @@ static int perl_source_event(PERL_SOURCE_REC *rec)
 
 		signal_emit("script error", 2, rec->script,
 			    SvPV(ERRSV, n_a));
-                g_free(package);
 	}
         perl_source_unref(rec);