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


in reply to Re^6: Tkx g_bind to menu on listbox only for selected row
in thread Tkx g_bind to menu on listbox only for selected row

$lb->g_bind(
    "<Enter>",
    [
sub {
    my ( $X, $Y, $y, $lb ) = @_;
    warn " $X,$Y,$y,$lb "
},
     Tkx::Ev(qw' %X %Y %y '),
     $lb,
    ],
);

[download]

In Section Seekers of Perl Wisdom