Cleanup PERL_5_6 ifdefs

servers/slapd/back-perl/add.c

@@ -41,11 +41,7 @@ perl_back_add(
 
 		PUTBACK;
 
-#ifdef PERL_IS_5_6
 		count = call_method("add", G_SCALAR);
-#else
-		count = perl_call_method("add", G_SCALAR);
-#endif
 
 		SPAGAIN;
 

servers/slapd/back-perl/bind.c

@@ -57,11 +57,7 @@ perl_back_bind(
 		XPUSHs(sv_2mortal(newSVpv( op->orb_cred.bv_val , op->orb_cred.bv_len)));
 		PUTBACK;
 
-#ifdef PERL_IS_5_6
 		count = call_method("bind", G_SCALAR);
-#else
-		count = perl_call_method("bind", G_SCALAR);
-#endif
 
 		SPAGAIN;
 

servers/slapd/back-perl/compare.c

@@ -55,11 +55,7 @@ perl_back_compare(
 		XPUSHs(sv_2mortal(newSVpv( avastr , 0)));
 		PUTBACK;
 
-#ifdef PERL_IS_5_6
 		count = call_method("compare", G_SCALAR);
-#else
-		count = perl_call_method("compare", G_SCALAR);
-#endif
 
 		SPAGAIN;
 

servers/slapd/back-perl/config.c

@@ -173,13 +173,8 @@ perl_cf(
 	} else {
 		switch( c->type ) {
 		case PERL_MODULE:
-#ifdef PERL_IS_5_6
 			snprintf( eval_str, EVAL_BUF_SIZE, "use %s;", c->argv[1] );
 			eval_pv( eval_str, 0 );
-#else
-			snprintf( eval_str, EVAL_BUF_SIZE, "%s.pm", c->argv[1] );
-			perl_require_pv( eval_str );
-#endif /* PERL_IS_5_6 */
 
 			if (SvTRUE(ERRSV)) {
 				STRLEN len;

servers/slapd/back-perl/delete.c

@@ -39,11 +39,7 @@ perl_back_delete(
 
 		PUTBACK;
 
-#ifdef PERL_IS_5_6
 		count = call_method("delete", G_SCALAR);
-#else
-		count = perl_call_method("delete", G_SCALAR);
-#endif
 
 		SPAGAIN;
 

servers/slapd/back-perl/init.c

@@ -130,11 +130,7 @@ perl_back_db_open(
 
 		PUTBACK;
 
-#ifdef PERL_IS_5_6
 		count = call_method("init", G_SCALAR);
-#else
-		count = perl_call_method("init", G_SCALAR);
-#endif
 
 		SPAGAIN;
 

servers/slapd/back-perl/modify.c

@@ -75,11 +75,7 @@ perl_back_modify(
 
 		PUTBACK;
 
-#ifdef PERL_IS_5_6
 		count = call_method("modify", G_SCALAR);
-#else
-		count = perl_call_method("modify", G_SCALAR);
-#endif
 
 		SPAGAIN;
 

servers/slapd/back-perl/modrdn.c

@@ -44,11 +44,7 @@ perl_back_modrdn(
 		}
 		PUTBACK ;
 
-#ifdef PERL_IS_5_6
 		count = call_method("modrdn", G_SCALAR);
-#else
-		count = perl_call_method("modrdn", G_SCALAR);
-#endif
 
 		SPAGAIN ;
 

servers/slapd/back-perl/search.c

@@ -57,11 +57,7 @@ perl_back_search(
 		}
 		PUTBACK;
 
-#ifdef PERL_IS_5_6
 		count = call_method("search", G_ARRAY );
-#else
-		count = perl_call_method("search", G_ARRAY );
-#endif
 
 		SPAGAIN;