Help for this page
$ perl -mO=Deparse -e 'if ( $1 eq 'A' || $1 eq 'B' ) { }' if ($1 eq 'A' or $1 eq 'B') { (); }
if( ($1 eq 'A') or ($1 eq 'B') ) { ...}