Tkx::font_configure('TkFixedFont',-size=>8);

.... 

  my $lb = $w_bfrm->new_tk__listbox( -height    =>3
                                   , -selectmode=>'extended'
                                   , -font      =>'TkFixedFont'
                                   );