perlでAが真且つBが真の時ってのを組みたいんだけど、その時は
if ( A ){ if ( B ){ 〜 }}か
if ( A , B ){ 〜 }
で良いかな?