use warnings;
use strict;

use Tk;

my $mw = new MainWindow();
$mw->Button()->grid($mw->Button());
$mw->Button()->pack();
MainLoop;

##</code><code>##

use warnings;
use strict;

use Tk;

my $mw = new MainWindow();
$mw->Button()->grid();
$mw->Button()->pack();
MainLoop;