if (2==@$aref && $aref->[0] eq $aref->[1]) ...