#! /usr/bin/perl
    if ($a == 5) {
        print "It's five!\n";
        print "\$a is equal to $a.\n";
    } elsif ($a == 6) {
        print "It's six!\n";
        print "\$a is equal to $a.\n";
    } else {
        print "\$a is something else.\n";
    }