foreach ( @{$gridtable} ){ # print Data::Dumper::Dumper( $_ ); # Text $_->{'Text'}->destroy(); # Pfeil $_->{'Pfeil'}->destroy(); # Spacer $_->{'Spacer'}->destroy(); # Grafik ( - Frame) $_->{'Grafik'}->destroy(); # gridtable zurücksetzen $gridtable = []; } # /foreach