A program that uses the until statement. : Until « Statement « Perl






  1. Perl
  2. Statement
  3. Until

A program that uses the until statement.

  
#!/usr/local/bin/perl 

print ("What is 17 plus 26?\n"); 
$correct_answer = 43; # the correct answer 
$input_answer = <STDIN>; 
chop ($input_answer); 
until ($input_answer == $correct_answer) { 
    print ("Wrong! Keep trying!\n"); 
    $input_answer = <STDIN>; 
    chop ($input_answer); 
} 
print ("You've got it!\n");








Related examples in the same category

1.Average-sales problem with sentinel-controlled repetition
2.Controlling Loop Flow
3.Looping Until
4.The until Loop
5.The until modifier repeatedly executes the second expression as long as the first expression is false.
6.The until statement
7.Use until to read user input
8.Using until with print statement
9.until statement
10.until with continue
11.until with diamond operator
12.until with integer