perldoc perlsyn, look for foreach. See also the entries for $" and $, in perldoc perlvar and perldoc -f join.

(I)s there any way to print all the elements of any array instead of referencing each element like so [0], [1], [2] ...etc?

If you want to print out each element of an array on its own line,

print join("\n", @array), "\n";
[download]

print map {$_ . "\n"} @array;
[download]

I like print join("\n", @array, ""), myself.

what does the print map state? what perldoc can I read about the map call?

what does the print map state?

Okay,

print join("\n", @array), "\n";
[download]

says "Stick a newline between each element in @array, return that as a string, print it, and print a newline at the end." On the other hand,

print map {$_ . "\n"} @array;
[download]

says "Build a list whose elements are the elements of @array with "\n" appended to them, then print that list."

what perldoc can I read about the map call?

You can read about any function with perldoc -f func_name.

--
F o x t r o t U n i f o r m
Found a typo in this node? /msg me
% man 3 strfry

perldoc -f map.

map is a list-transformer; you give it a block of code and a list, and it applies the code to each element of the list, and returns a list made up of what the code returned for each element.

You can read perlfunc to find out about map. Also, the easiest way to print all the elements of an array is:

print "@array\n";

while (<FH>) {
   chomp $_;
   $a[$i]=$_;
   $i++;
}
[download]

@a = <FH>;  # diamond operator in "list" (or array) context
            # will read all input records into array elements
chomp @a;   # chomp can work on a list
[download]

while (<FH>) {
   chomp;        # $_ is the default arg to chomp;
     # ... do other things to $_ if necessary ...

   push @a, $_;  # add a new element at end of @a
}
[download]

 perl -e '@a=qw/one two three four/; print @a,$/'

 perl -e '@a=qw/one two three four/; print "@a$/"'

 perl -e '@a=qw/one two three four/; print join(" ", map { "foo=$_" } 
+@a), $/'
[download]

$, = "\t";
print @array;
#or
print shift . "\t" while @array;
#or
print $_    . "\t" for   @array;
#or
print map { $_ . "\t" } @array;
#or
print join("\t", @array);
[download]

I use:

  print $_, "\n" for @a;
[download]