#!/usr/bin/perl -w use strict; my $bool = 1; if ($bool) { print "/\$bool: I'm true, so this get's printed.\n"; } elsif ($bool) { print "/\$bool: You'll never see me if I'm true.\n"; } else { print "/\$bool: Nobody loves me, everybody hates me.\n"; } #### if ($bool) { print "/\$bool I'm true, so this get's printed.\n"; } if ($bool == 1) { print "/\$bool You love me! You really love me!\n"; } if ($bool != 2) { print "/\$bool First, I want to think my manager...\n"; }