/home/httpd/html/Lesson3/unless.pl.html

#!/usr/bin/perl -w
# $a = 0;
$a = 1;
unless ($a == 0) {
    print "In loop: \$a = $a\n";
}