for my $foo (@bar) { $foo->get_hyperobject()->baz( 1, -totalkrasserparameter => 42, -bildsuchlauf => 'blubb', ); alles_wird_gut( 17, 42, 23, $foo->magic_numer(), scalar @bar, ); }