The range operator and foreach loop : Range « Statement « Perl





The range operator and foreach loop

  

foreach $hour (1 .. 24){  
     if ($hour > 0 && $hour < 12) {
        print "Good-morning.\n";
     }
     elsif ($hour == 12) {
        print "Happy Lunch.\n";
     }
     elsif ($hour > 12 && $hour < 17) {
        print "Good afternoon.\n";
     }
     else {
        print "Good-night.\n";
     }
}

   
    
  










Related examples in the same category

1.Demonstrating the .. operator
2.@numbers = ( 1 .. 10 );
3.Using .. to construct array
4.The .. operator goes from a minimum to a maximum, with foreach
5.Setting elements in a list to equal the corresponding elements of another list with three different names
6.Use range operator with for statement
7.Range counting up
8.Range counting down
9.Range based on letter
10.Range based on letter and digit: from 3 to z
11.Range based on letter and digit: from z to 3
12.From to
13.The Range Operator and Array Assignment
14.Range Operator
15.range list and for loop
16.Two ranges
17.Letter based range
18.String based range
19.Counting Up And Down