...
Code Block | ||||
---|---|---|---|---|
| ||||
my $num = 2; print "Enter a number\n"; my $user_num = <STDIN>; chomp $user_num; if ($num eq== $user_num) {print "true\n"} else {print "false\n"}; |
...
Tool | Diagnostic |
---|---|
Perl::Critic | ValuesAndExpressions::ProhibitMismatchedOperators |
Bibliography
...