in reply to Manipulating Tk canvas from callbacks

gettags('all') returns you all the tags associated with all the items on the canvas. It looks like you actually want 
$canvas->find('all');

[download]

C.

In Section Seekers of Perl Wisdom