in reply to Perl Tk Text Selection

I came up with the solution. Just use the indexes

'sel.first' and 'sel.last'

[download]

In Section Seekers of Perl Wisdom