Eine Möglichkeit wäre, das alternative Modul Tcl::Tk zu verwenden. Es gibt sogar eine Möglichkeit, die gleiche Aufrufsyntax wie beim originalen Perl/Tk zu verwenden.

Hätte ich einen Mac, gäbe es bestimmt schon einen Port von Perl/Tk auf Aqua :-)