http://qs321.pair.com?node_id=144066


in reply to find the element position of $scalar

my $i=0;
foreach $scalar(@array) {
   print("$scalar is $i element\n");
   $i++;
   }

[download]
or, shorter: 
my $i=0;
for(@array) {
   print("$_ is $i element\n");
   $i++;
   }

[download]


The white hole.

In Section Seekers of Perl Wisdom