Perl - Common Conditional Statements
#if, elseif, else if ($myNumber == 5) { print "My Number is Five \n"; } elsif ($myNumber == 3.14) { print "My Number is Pi \n"; } else { print "My Number is neither Five nor Pi \n\n" } #while loop while ($myNumber != 0) #could do: until ($myNumber == 0) { print "My Number is: ", $myNumber, "\n"; $myNumber -= 1; } print "\n"; #for loop for ($myNumber = 0; $myNumber < 5; $myNumber++) { print "My Number is: ", $myNumber, "\n"; } print "\n"; #foreach loop foreach my $currentElement (@myList) { print "The current element is: ", $currentElement, "\n"; }
Source: knowledge.ni.com