Help for this page
my $idx = $#array; while ($idx--) { print "$array[$idx]\n"; }
my $output = ''; for my $elem (@array) { ... } $output .= "\n"; print $output;