Du solltest Dir vielleicht erstmal die Grundlagen anschauen. Ganz gut geeignet für so etwas ist das Einführungs-Skript von Strat unter http://www.fabiani.net -- Vorträge -- Einführung in Perl

Dort kannst Du Dir mal so etwas wie if-Bedingungen anschauen.