hard wired perl buildin function wrapper in perl-glue.c