Bruk av if uttalelse i perl

Noen ganger krever det å utføre en eller flere utsagn basert på en bestemt tilstand. Dette problemet kan løses ved å bruke "hvis" -uttalelsen. Det er en veldig nyttig uttalelse for ethvert programmeringsspråk. Måtene å bruke forskjellige typer “IF” -uttalelser i Perl -skriptet har blitt vist i denne opplæringen.”

Syntaks

Ulike syntakser av "hvis" uttalelser er gitt nedenfor.
EN. Hvis uttalelse

If (tilstand)
uttalelse (er)

Ovennevnte syntaks brukes til å utføre utsagnene hvis tilstanden som er definert i "hvis" -uttalelsen, returnerer sann.

B. If-Else-uttalelse

If (tilstand)
uttalelse (er)
annet
uttalelse (er)

Ovennevnte syntaks brukes til å utføre uttalelsene fra "hvis" -blokken hvis tilstanden kommer tilbake ellers, utfører uttalelsene fra "annet" -blokken.

C. If-Else-hvis-uttalelse

if (tilstand)
uttalelse (er)
annet hvis (tilstand)
uttalelse (er)

ellers hvis (tilstand)
uttalelse (er)

..
annet
uttalelse (er)

Ovennevnte syntaks brukes til å utføre uttalelsene fra den første "hvis" -blokken hvis tilstanden kommer tilbake på annen måte, utfører uttalelsene fra neste "ellers" -blokk hvis tilstanden kommer tilbake. Hvis tilstanden til alle "hvis" -blokk returnerer falsk, vil uttalelsene fra "ellers" -blokken bli utført.

Bruken av forskjellige typer "hvis" uttalelser er vist i neste del av denne opplæringen.

Eksempel 1: Bruk av "if" -uttalelse

Opprett en Perl -fil med følgende kode som vil skrive ut gjeldende dato og klokkeslett for systemet hvis inngangsnummeret tatt fra brukeren er større enn eller lik 10; Ellers vil ingenting bli skrevet ut. De lokal tid() Funksjonen har blitt brukt i koden for å lese gjeldende dato og klokkeslett for systemet.

# Ta et tallinngang fra brukeren
Skriv ut "Skriv inn et tall:";
$ verdi =;
# Sjekk om inngangsverdien er større enn eller lik 10 eller ikke
if ($ verdi> = 10)
# Les gjeldende dato og klokkeslett
$ dateTime = localime ();
# Skriv ut gjeldende dato og tidsverdi
Print ("I dag er $ DateTime \ n");

Produksjon
Følgende utgang vises etter å ha utført ovennevnte kode to ganger med inngangsverdiene 10 og 5.

Eksempel-2: Bruk av "if-elv" -uttalelse

Opprett en Perl -fil med følgende kode som sammenligner to tallverdier hentet fra brukeren og skriver ut en melding basert på verdiene. CHOMP () -funksjonen har blitt brukt til å fjerne newlinjene fra inngangsverdiene. Int () -funksjonen har blitt brukt til å konvertere inngangsverdien til tallet før de sammenligner verdiene. Uttalelsen "if-elv" har blitt brukt her for å sjekke om inngangsnumrene er like eller ikke.

# Ta nummerinngangene fra brukeren
Skriv ut "Skriv inn det første nummeret:";
$ verdi1 =;
Skriv ut "Skriv inn det andre nummeret:";
$ verdi2 =;
# Fjern den nye linjen fra hver inngang
CHOMP ($ verdi1);
CHOMP ($ verdi2);
# Kontroller inngangsverdiene er like eller ikke
if (int ($ value1) == int ($ value2))
Skriv ut "$ Value1 og $ Value2 er like.\ n ";

ellers

Skriv ut "$ Value1 og $ Value2 er ikke like.\ n ";

Produksjon
Følgende utgang vises etter å ha utført ovennevnte kode med verdiene 7 og 5.

Følgende utgang vises etter å ha utført ovennevnte kode med verdiene 4 og 4.

Eksempel-3: Bruk av "if-elsif-elv" -uttalelse

Opprett en Perl -fil med følgende kode som vil sjekke om to nummerverdier hentet fra brukeren er like eller det første tallet er større enn det andre nummeret, eller det første tallet er mindre enn det andre tallet. CHOMP () -funksjonen har blitt brukt til å fjerne newlinjene fra inngangsverdiene. Int () -funksjonen har blitt brukt til å konvertere inngangsverdien til tallet før de sammenligner verdiene. Uttalelsen om "if-elsif-elv" har blitt brukt her for å gjøre oppgaven som er nevnt ovenfor og skrive ut riktig melding,

# Ta antall innganger fra brukeren
Skriv ut "Skriv inn det første nummeret:";
$ verdi1 =;
Skriv ut "Skriv inn det andre nummeret:";
$ verdi2 =;
# Fjern den nye linjen fra hver inngang
CHOMP ($ verdi1);
CHOMP ($ verdi2);
# Kontroller inngangsverdiene er like eller ikke
if (int ($ value1) == int ($ value2))
Skriv ut "$ Value1 og $ Value2 er like.\ n ";

# Sjekk den første verdien er mindre enn den andre verdien
Elsif (int ($ verdi1) < int($value2))

utskrift "$ verdi1 er mindre enn $ verdi2.\ n ";

ellers

utskrift "$ verdi1 er større enn $ verdi2.\ n ";

Produksjon
Følgende utgang vises etter å ha utført ovennevnte kode med verdiene 5 og 5.

Følgende utgang vises etter å ha utført ovennevnte kode med verdiene 9 og 5.

Følgende utgang vises etter å ha utført ovennevnte kode med verdiene 3 og 6.

Eksempel-4: Bruk av nestet “if” -uttalelse

Opprett en Perl -fil med følgende kode som bruker nestede “IF” -forhold for å skrive ut en melding basert på inngangsverdien tatt fra brukeren. I henhold til koden, hvis MCQ -merket hentet fra brukeren er større enn eller lik 70, vil de beskrivende merkene bli hentet fra brukeren, og den andre "hvis" -tilstanden blir sjekket. Hvis det beskrivende merket er større enn eller lik 50, så "Du har bestått eksamen.”Eventuelle andre meldinger vil bli skrevet ut hvis noen av" hvis "-forholdene kommer tilbake.

# Ta MCQ -merkene fra brukeren
Skriv ut "Skriv inn MCQ -merkene:";
$ mcq = ;
# Sjekk den første tilstanden
if ($ mcq> = 70)
# Ta de beskrivende merkene fra brukeren
Skriv ut "Skriv inn de beskrivende merkene:";
$ beskrivende = ;
# Kontroller den andre tilstanden
if ($ beskrivende> = 50)
# Skriv ut melding når begge "hvis" -forholdene returnerer sant
Skriv ut "Du har bestått eksamen.\ n ";

ellers

# Skriv ut melding hvis den andre "hvis" tilstanden returnerer falsk
Skriv ut "Du har mislyktes i eksamen.\ n ";

annet
# Skriv ut melding hvis den første "hvis" tilstanden returnerer falsk
Skriv ut "Du har mislyktes i eksamen.\ n ";

Produksjon
Følgende utgang vises etter å ha utført ovennevnte kode med verdiene 75 og 46.

Følgende utgang vises etter å ha utført ovennevnte kode med verdiene 77 og 58.

Følgende utgang vises etter å ha utført koden ovenfor med verdien 65.

Konklusjon

Måten å bruke enkle “if”, “If-Else”, “if-elsif-Else”, og nestet “IF” -uttalelser har blitt vist i denne opplæringen ved å bruke flere eksempler.