perl_run(my_perl); eval_pv(buffer, TRUE);