C: clean wrong PERL_UNUSED_VAR(x), x is used