$frame1 = $mw->Frame->pack(); $frame2 = $mw->Frame(-borderwidth => 2, -relief => 'groove')->pack();