Perl операторы болса

Егер сөз тіркесі төменде көрсетілгендей, шартты және кейінгі нұсқаулар жиынтығынан тұрады:

  егер (шарт) {   Өтініш (өтініш); } 

Өтініштер тек берілген шарт шын болғанда орындалады. Егер шарт жалған болса, онда if statement body ішіндегі мәлімдемелер толығымен еленбейді.

Мысал:

Келесі мысалда айнымалы «num» мәніне тағайындалған бүтін мән бар. Егер if операторы болса, біз num-ге тағайындалған мән 100-ден аз немесе жоқ екенін тексереміз.

  #! / usr / local / bin / perl printf «кез келген санды енгізіңіз:»; $ num = <STDIN>; егер ($ num <100) {# Бұл баспа өтініші орындалады,# Жоғарыда көрсетілген шарт шын болсаprintf «саны 100-ден аз \ n»; } 

Шығару:

  Кез келген нөмірді енгізіңіз: 78 num 100-ден аз 

Perl ішіндегі енгізілген сөз

Басқа if операторында if statement болса, онда ол енгізілген if операторы деп аталады.
Егер кірістірілген құрылым:

  егер (condition_1) {Statement1 (s);егер (condition_2) {   Statement2 (s);} } 

Егер шарт_1 шын болса, мәлімдеме1 орындалады. Statement2 шарттардың екеуі де (condition_1 және condition_2) шын болса ғана орындалады.

Мысал:

  #! / usr / local / bin / perl printf «кез келген санды енгізіңіз:»; $ num = <STDIN>; егер ($ num <100) {printf «саны 100-ден аз \ n»;егер ($ num> 90) {   printf «num 90-дан жоғары \ n»;} } 

Шығару:

  Кез келген нөмірді енгізіңіз: 99 num 100-ден аз num үлкен 90