remove unused preprocess in perl-glue.c