EVT_LEFT_DOWN  ( $panel, sub {$button[1]->SetLabel( 'touch the panel with left click' ) });
	EVT_LEFT_UP    ( $panel, sub {$button[1]->SetLabel( 'release the panel from left click' ) });