Simple Perl code/syntax question

[Luinrandir Hernsen]

Hallo everyone and thank you for your previous help

in basic the code would be

for x=1 to 100
Select Case
    Case=10,20,30,40,50,60,70,80,90
        then do this
    else 
       else do this
end select
next x

how is this done in perl?

foreach (10,20,30,40,50,60,70,80,90);
{
do this;
}

???? I think I need to unpack my books! (i'm moving)LOL
Lou

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>