Well, Tk isn't supposed to be thread-safe, but I see no reason why your code wouldn't work, since all of the Tk calls are happening in the same thread. What problem are you having? I'd test it here but my perl wasn't configured with threading.

---

If I were a terrorist I'd mainly be afraid of polar bears. Because at the moment, I'm mainly afraid of polar bears, and I can't really see why that would change.
- slashdot