my $fenster = MainWindow->new();


my $entry = $fenster->Entry();

my $hallo = $fenster->Label(
            -text  &
nbsp;     =>    "name: ".$entry->pack(),
            -height &nbsp
;      =>    40,
            -width  
      =>    35
);


$hallo->pack();


MainLoop();