my @data = (0, 1, 2, 3, 4); # 5 elements
foreach my $name (@data) {
    print "$name\n";
}

##</code><code>##

0
1
2
3
4