my @liste = ('a', 'b'); foreach my $element (@liste) { print $element } > ab