Select Code to Download

my $scrolled_listbox = $popup_frame->Scrolled(
        qw/Listbox -selectmode browse -scrollbars oe -exportselection 
+0/
        );

my $scrolled_listbox = $popup_frame->Scrolled(
        qw/Listbox -selectmode browse -scrollbars e -exportselection 0
+/
        );

$scrolled_listbox->configure(-scrollbars => 'oe');

$scrolled_listbox->configure(-scrollbars => 'e');