for my $j(0..scalar(@name)-1) {
  my $test = $j;
  $profilframe->Label( -image => $photos[$j], -background => 'sky blue' )->place(-x=>'5', -y => $y + 3);
  $profilframe->Button( -text=>$name[$j], -background => 'sky blue', -font=>'{Bimini} 12 {bold}', -relief=>'flat', -activebackground => 'yellow', -command => sub { zeige_beschreibung($test); } )->place(-x=>'28p', -y => $y);
  $y += 35;
  }