|
|
sybperl-l Archive
Up Prev Next
From: "Marcotte, Lawrence" <Lawrence dot Marcotte at LibertyMutual dot com>
Subject: RE: break statement
Date: Oct 13 1997 3:04PM
There is no break statement in Perl. Look up the last statement
On Monday, October 13, 1997 9:06 AM, Gayatri Krishnan
[SMTP:gayatri@ml.com] wrote:
> Hi,
> Can someone help me with the 'break statement with in a
'foreach'
> loop???
>
> I've an array @a with numbers (123, 124, 125)
>
>
> foreach $i (0 .. $#a) {
> if ($e[$i] == "123") {
> $code = "A";
> }
> elsif ($e[$i] == "124") {
> $code = "B";
> break;
> }
> elsif ($e[$i] == "125") {
> $code = "C";
> }
> }
>
> Problem is the loop doesn't break when 'a' is 124... instead it
goes
> thru all the conditions and $code gets assigned C.
>
>
> Thanks!
>
> gayatri
|
