Goto statement with label : goto « Statement « Perl

1. Perl
2. Statement
3. goto

Goto statement with label

  

INPUT: $line = <>;
if ($line !~ /exit/) {
   print "Try again\n"; 
   goto INPUT
}

   
    
  

Related examples in the same category