Using exit command to exit an program : exit « System Functions « Perl

1. Perl
2. System Functions
3. exit

Using exit command to exit an program

      

print "Please type the letter y\n";
while (<>) {
    chop;
    if ($_ ne 'y') {
        print "Please type the letter y\n";
    } else {
        print "Do you always do what you're told?\n";
        exit;
    }
}

   
    
    
    
    
    
  

Related examples in the same category