http://www.perlmonks.org?node_id=951113


in reply to Tk::Balloon and unclunky menus.

map { my $junk = $men.... $globalBaloonWidget->attach( $junk, -balloonmsg => $_->[-1] ); ...