diff --git a/Source/Modules1.1/perl5.cxx b/Source/Modules1.1/perl5.cxx
index 465baf56b..c17173de4 100644
--- a/Source/Modules1.1/perl5.cxx
+++ b/Source/Modules1.1/perl5.cxx
@@ -283,7 +283,6 @@ PERL5::initialize()
   Printf(f_init,"\t dXSARGS;\n");
   Printf(f_init,"\t int i;\n");
   Printf(f_init,"\t char *file = __FILE__;\n");
-  Printf(f_init,"\t cv = cv; items = items;\n");
   Printv(f_init,
 	 "for (i = 0; swig_types_initial[i]; i++) {\n",
 	 "swig_types[i] = SWIG_TypeRegister(swig_types_initial[i]);\n",
@@ -294,7 +293,6 @@ PERL5::initialize()
 	 "XS(_wrap_perl5_", cmodule, "_var_init) {\n",
          tab4, "dXSARGS;\n",
 	 tab4, "SV *sv;\n",
-	 tab4, "cv = cv; items = items;\n",
 	 0);
 
   Printf(f_pm,"# This file was automatically generated by SWIG\n");
@@ -516,7 +514,6 @@ PERL5::create_function(char *name, char *iname, SwigType *d, ParmList *l)
   outarg  = NewString("");
 
   Printv(f->def, "XS(", Swig_name_wrapper(iname), ") {\n", 0);
-  Printv(f->code, tab4, "cv = cv;\n", 0);
 
   pcount = emit_args(d, l, f);
   numopt = check_numopt(l);