...I just need help in getting all of the widgets and or additional ones in one window....

Hi,

Its real simple, if you're using the no-tcl-Eval version, well there is nothing mysterious there, just "pack" whatever extra widgets you want in the mainwindow ( $mw->Label... $mw->Listbox... ->pack )

If you're using the tcl-eval version, pay attention to this part

# Tcl inclusion for GUI finished here; you can work with widgets here 
+like:
my $lab = $mw->interp->widget('.status');
$lab->configure(-text=>'new text here...');
[download]

Do you get it now? All you have to do is

my $mw = $int->widget( ... ,'MainWindow');
$mw->Button(-text => 'freedom' )->pack;
[download]

The ... part is a secret, you have to read tcl tk docs to find out what it is