条件の指定には、if　を使用します。
もし・・・なになにだったら・・・という使い方をします。

例えば以下は、もしある「Ａ」が「Ｂ」という文字だったらの場合は・・・
Cを表示します。
#-----------------------------
if("A" eq "B") { print "C"; }
#-----------------------------

例えば以下は、もしある「Ａ」が「Ｂ」という文字じゃなかったら・・・
Cを表示します。
#-----------------------------
if("A" ne "B") { print "C"; }
#-----------------------------

上記は一例ですが、実際には以下のように使用します。 
フォームの入力欄がe-mailとした場合、このe-mailの
フォームの中が空っぽだった場合に、エラーを出す記述です。

#-----------------------------
if($FORM{'e-mail'} eq "") { &error; }

sub error {

print "メールアドレスが入力されていません。\n";

}
#-----------------------------

逆に空っぽでない場合に、表示させる場合は・・・

#-----------------------------
if($FORM{'e-mail'} ne "") { &error; }

sub error {

print "メールアドレスが入力されています。\n";

}
#-----------------------------
となります。

この2つを合わせる場合は以下のようにします。

#-----------------------------
if($FORM{'e-mail'} eq "") { &error; }

else{ &error2; }

sub error {

print "メールアドレスが入力されていません。\n";

}

sub error2 {

print "メールアドレスが入力されています。\n";

}

#-----------------------------
このように、else を使用します。
複数ある場合は以下のように、elsif を使用します。
#-----------------------------
if($FORM{'e-mail'} eq "") { &error; }
elsif($FORM{'name'} eq "") { &error2; }
elsif($FORM{'comment'} eq "") { &error3; }
else{ &error4; }

sub error {

print "メールアドレスが入力されていません。\n";

}

sub error2 {

print "名前が入力されていません。\n";

}

sub error3 {

print "コメントが入力されていません。\n";

}

sub error4 {

print "その他が入力されていません。\n";

}

#-----------------------------
このように複数指定することが可能です。