$fensterL = $hauptfenster -> Canvas (-height=>$hoehe,-width=>$breite/4,-background=>'chocolate',-relief=>'groove',-bd=>3);
$fensterM = $hauptfenster -> Frame (-height=>$hoehe,-width=>$breite/4,-background=>'chocolate1',-relief=>'groove',-bd=>3);
$fensterR = $hauptfenster -> Frame (-height=>$hoehe,-width=>$breite/4,-background=>'chocolate2',-relief=>'groove',-bd=>3);
$fenster = $hauptfenster -> Frame (-height=>$hoehe,-width=>$breite/4,-background=>'chocolate3',-relief=>'groove',-bd=>3);
$fensterL -> pack(-side=>'left');
$fensterM -> pack(-side=>'left');
$fensterR -> pack(-side=>'left');
$fenster -> pack(-side=>'left');


$anmeld=$fensterL->Label(-text=>"Anmeldename")->pack(-side=>'top');
$test=$fensterM->Button(-text=>"Button")->pack();