...
#zeile1
if ( $ref_hash_konfig->{pfeil_zurueck} == '1'){
        $frame_kontakte_haupt->Button(-text => '<<', -command => [\&eintrag_zurueck],)->grid(-row=>'0', -column=>'0', -sticky => 'w');
    }
    if ( $ref_hash_konfig->{nachname} == '1'){
        $frame_kontakte_haupt->Label(-text => "Nachname:")->grid(-row=>'0', -column=>'1', -sticky => 'w');
        $frame_kontakte_haupt->Entry(-textvariable=> \$ref_hash_haupt->{nachname}, -state => '$ref_hash_berechtigung->{nachname}')->grid(-row=>'0', -column=>'2', -sticky => 'w');
    }
    else{
        $spacer1 = $frame_kontakte_haupt->Photo('-format' => 'png', -file => 'images/spacer1.png');
        $frame_kontakte_haupt->Label(-image => $spacer1, -width => "200", -height => "10")->grid(-row=>'0', -column=>'1', -columnspan => '2', -sticky => 'w');
    }
    if ( $ref_hash_konfig->{vorname} == '1'){
        $frame_kontakte_haupt->Label(-text => "Vornamen:")->grid(-row=>'0', -column=>'3', -sticky => 'w');
        $frame_kontakte_haupt->Entry(-textvariable=> \$ref_hash_haupt->{vorname})->grid(-row=>'0', -column=>'4', -sticky => 'w');
    }
    else{
        $spacer2 = $frame_kontakte_haupt->Photo('-format' => 'png', -file => 'images/spacer2.png');
        $frame_kontakte_haupt->Label(-image => $spacer2, -width => "242", -height => "10")->grid(-row=>'0', -column=>'3', -columnspan => '2', -sticky => 'w');
    }
    if ( $ref_hash_konfig->{pfeil_vor} == '1'){
        $frame_kontakte_haupt->Button(-text => '>>', -command => [\&eintrag_vor])->grid(-row=>'0', -column=>'5', -sticky => 'w');
    }
    if ( $ref_hash_konfig->{zimmer_bett} == '1'){
        $frame_kontakte_haupt->Label(-text => "Zimmer / Bett:")->grid(-row=>'0', -column=>'6', -sticky => 'w');
        $frame_kontakte_haupt->BrowseEntry( -variable => \$ref_hash_haupt->{zimmerbett})->grid(-row=>'0', -column=>'7', -sticky => 'w');
    }
    else{
        $spacer3 = $frame_kontakte_haupt->Photo('-format' => 'png', -file => 'images/spacer3.png');
        $frame_kontakte_haupt->Label(-image => $spacer3, -width => "232", -height => "10")->grid(-row=>'0', -column=>'6', -columnspan => '2', -sticky => 'w');
    }
...
#zeile2
  if ( $ref_hash_konfig->{anrede} == '1'){
        $frame_kontakte_haupt->Label(-text => "Anrede:")->grid(-row=>'1', -column=>'1', -sticky => 'w');
        $frame_kontakte_haupt->BrowseEntry(-variable => \$ref_hash_haupt->{anrede}, -colorstate => 'white',)->grid(-row=>'1', -column=>'2', -sticky => 'w');
    }
    else{
        $spacer1 = $frame_kontakte_haupt->Photo('-format' => 'png', -file => 'images/spacer1.png');
        $frame_kontakte_haupt->Label(-image => $spacer1, -width => "200", -height => "10")->grid(-row=>'1', -column=>'1', -columnspan => '2', -sticky => 'w');
    }
...
#zeile3
 if ( $ref_hash_konfig->{geburtstag} == '1'){
        $frame_kontakte_haupt->Label(-text => "Geburtstag:")->grid(-row=>'2', -column=>'1', -sticky => 'w');
        $frame_kontakte_haupt->Entry(-textvariable=> \$ref_hash_haupt->{geburtstag})->grid(-row=>'2', -column=>'2', -sticky => 'w');
    }
    else{
        $spacer1 = $frame_kontakte_haupt->Photo('-format' => 'png', -file => 'images/spacer1.png');
        $frame_kontakte_haupt->Label(-image => $spacer1, -width => "200", -height => "10")->grid(-row=>'2', -column=>'1', -columnspan => '2', -sticky => 'w');
    }
...
#zeile4
...