How to tell the last iteration in a foreach loop?

meili100

Expand|Select|Wrap|Line Numbers

 
foreach $key (keys (%hash)){

  print "$hash{$key}:";

}

The last element will also be followed by a ":" which is not what I want. Is there a way to tell when foreach loops to its last round, so that I can skip printing the last ":"? Thanks!

numberwhun

First, please use code tags, they are required.

Second, can you provide a sample of the data so we can see what you are talking about?

Regards,

Jeff

KevinADC

already answered on tek-tips

Expand|Select|Wrap|Line Numbers

print join(':', map{$hash{$_}} keys %hash);

vikramkumar

for example assume i have an array i.e,

Expand|Select|Wrap|Line Numbers

 
my @a = (1,2,3,4,5,6);
 
for(my $i = 0;$i<$#a;$i++) {

         print $a[$i];

}

Above for loop we r excluding last element to print;

Ganon11

That's because you have i<$#a - use i<=$#a instead.

Better yet, use a foreach loop:

Expand|Select|Wrap|Line Numbers

 for my $element (@a) {

   print $element;

}

KevinADC

for example assume i have an array i.e,

Expand|Select|Wrap|Line Numbers

my @a = (1,2,3,4,5,6);

for(my $i = 0;$i<$#a;$i++) {

print $a[$i];

}

Above for loop we r excluding last element to print;

Next time post a new thread.

How to tell the last iteration in a foreach loop?

Post your reply

Similar topics