7 lines
114 B
Perl
7 lines
114 B
Perl
|
use Tk;
|
||
|
|
||
|
$main = MainWindow->new();
|
||
|
|
||
|
$listbox1 = $main->Listbox("-width" => 25,
|
||
|
"-height" => 5
|
||
|
)->pack;
|