Re: While loop

You have to change a minor piece of your code, that is replace 'until' with 'while' ;-).

Just like so..

do
{
print "Enter Yes or No \n";
chomp($input = <>);
if ($input eq 'yes')
{
    print "Yes entered for system.\n";


}
elsif($input eq 'no')
{
    print "No entered for system.\n";

}

}
while ($input =~ /^yes$/ or $input =~ /^no$/);
[download]

$"=q;grep;;$,=q"grep";for(`find . -name ".saves*~"`){s;$/;;;/(.*-(\d+)
+-.*)$/;$_=["ps -e -o pid | "," $2 | "," -v "," "];`@$_`?{print"+ $1"}
+:{print"- $1"}&&`rm $1`;print"\n";}
[download]

Comment on Re: While loop Select or Download Code

Replies are listed 'Best First'.
Re: Re: While loop by Mr. Muskrat (Canon) on May 14, 2002 at 19:22 UTC
Shouldn't the `while ($input =~ /^yes$/ or $input =~ /^no$/);` [download] actually be `while ($input !~ /^yes$/ or $input !~ /^no$/);` [download] ? Who says that programmers can't work in the Marketing Department? Or is that who says that Marketing people can't program?	[reply] [d/l] [select]
Re: Re: While loop by Anonymous Monk on May 14, 2002 at 18:48 UTC
Thanks for all answers.	[reply]