mehrer if bedigungen

[seth]

gudn tach!

also nochmals: IF darf nur dann zu treffen wenn bedigung1 20 ist ABER bedigung2 NICHT 20 oder 21 ist!

ahaa!

  
if($KA eq "20" && !($before eq "20" || $before eq "21")){  
 // $KA ist '20' und $before ist weder '20' noch '21'  
}

(! ist der "nicht-"operator)

oder

  
if($KA eq "20" && ($before ne "20" && $before ne "21")){  
 // ...  
}

oder

  
if($KA eq '20' && $before!~/^2[01]$/){  
 // ...  
}

naeheres: perldoc perlop

prost
seth