... my $defaultcolor = $beenden->cget("-background"); ...