perl_destruct (my_perl);
perl_free(my_perl);

return (queue);