Mega Code Archive

 

Categories / Perl / Statement

 

Conditional Control Statements

#    if (Expression) {Code Segment} #    if (Expression) {Code Segment} else {Code Segment} #    if (Expression) {Code Segment} elsif {Code Segment} ... else {Code Segment}     #!/usr/local/bin/perl -w     while (<STDIN>)     {        chomp;        if ($_ < 10)        {           print "$_ is less than 10.\n";        }        elsif ($_ < 20)        {           print "$_ is between the values of 10 and 19.\n";        }        else        {           print "$_ is greater than or equal to 20.\n";        }     }