in reply to binding listbox with perl tkx

Try binding to the main window instead of the listbox, i.e.:
#make this change... #$lbox->g_bind('<ButtonRelease-1>' , sub { clic() }); $mw->g_bind('<ButtonRelease-1>' , sub { clic() });