I left using next to your own discovery...THAT: { # Ask for input print "What is the Part Number that you would like to look up?\n"; # Get it my $PartNumber = <STDIN>; # See if it's empty print "There was no input" if ($PartNumber eq "\n"); # Execute next Block THIS: { print "What is the Revision level for $PartNumber"; my $Revision = <STDIN>; # Pattern match or test until finished redo THIS if($Revision =~/rev/g); last THAT if($Revision=~/bored/g); # or Repeat the part look-up again redo THAT; } }
In reply to Re: using redo in an if/else statement
by JamesNC
in thread using redo in an if/else statement
by Bismark
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |