1. Sample Program using ‘if’ and ‘if else’
$sequence="ATGC";
if(defined $seq)
{
print "defined";
}
else
{
print "not defined";
}
Output: ???
2. Sample Program using ‘if’ and ‘if else’
print "Enter 2 numbers, one per line\n";
$a = <STDIN>;
$b = <STDIN>;
if
( $a < $b ) {
print "$a then $b\n";
}
else
{
print "$b then $a\n";
}
elsif
print "Enter 2 numbers, one per line\n";
$a = <STDIN>;
$b = <STDIN>;
if
( $a < $b ) {
print "$a is less than $b\n";
}
elsif
( $b < $a ) {
print "$b is less than $a\n";
}
else
{
print "The numbers are equal.\n";
}
1. Sample program using ‘elsif’