($a, $b, $c, $d) = (2, 1, 3, 2);
if (($a, $a, $a) == ($b, $c, $d)) {
print 'hoge';
}
--
hoge