help needed to get over endless loop

[Brian]

Hi
I had this semi-working, changed something and can't remember where I 
went right, so would appreciate some help getting back on top.

I know 1..10 and 2..10 probably won't work in the following example, I 
have just changed lines to show what I am trying to get.

$mystart = -2;
$i = 1;

for ($i = 1..10 ) {

while ($i = 1 ) {
        if  ($mystart < 1 ) {print "line 1 no data"}
        if  ($mystart > 0 ) {print "line 1 data"}
        $mystart++ ; $i++;
}
}



while ($i = 2..10 ) {
        if  ($mystart < 1 ) {print "line 2..10 no data"}
        if  ($mystart > 0 ) {print "line 2..10 with data"}
        $mystart++ ; $i++;
}
}


thanks
Brian


--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/