# mit Array
my @labels;
for my $i ( 0 .. 3 ) {
  $labels[$i] = 'bla';
}