Perl - Multiple condition if statement without duplicating code

Question

This is a Perl program  run using a terminal  Windows Command Line   I am trying to create an  quot if this and this is true  or this and this is true quot  if statement using the same block of code for both conditions without having to repeat the code  if   name eq  quot tom quot  and  password eq  quot 123  quot   elsif   name eq  quot frank quot  and  password eq  quot 321  quot          print  quot You have gained access  quot     else        print  quot Access denied  quot

User · Answer

I don t recommend storing passwords in a script  but this is a way to what you indicate  use 5 010  my  user table     tom   gt   123    frank   gt   321       say    user table   name   eq  password    You have gained access                                              Access denied           Any time you want to enforce an association like this  it s a good idea to think of a table  and the most common form of table in Perl is the hash

User · Answer

if       name eq  quot tom quot  and  password eq  quot 123  quot       or   name eq  quot frank quot  and  password eq  quot 321  quot           print  quot You have gained access  quot     else       print  quot Access denied  quot

User · Answer

Simple   if    name eq  tom   amp  amp   password eq  123           name eq  frank   amp  amp   password eq  321          use the high-precedence  amp  amp  and    in expressions  reserving and and or for flow control  to avoid common precedence errors   Better   my  password          tom    gt   123         frank    gt   321        if   exists  password  name   amp  amp   password eq  password  name

[perl] Perl - Multiple condition if statement without duplicating code?

Examples related to perl

Examples related to if-statement