if(! $found && $password1 eq $password2){ # ごにょごにょ }としたくて、 if(not $found && $password1 eq $password2){ # ごにょごにょ }としたらはまった。だってさ、not $foundのほうがかっこいいじゃん？ 演算子の優先順位って大事ですね。