map { my_delete($canvas, $_) } @$ptext;