in perl_clone_using, free the prt_table