in reply to Asssigning widget identifier

Thanks guys. The suggestions work great.

In Section Seekers of Perl Wisdom