my @chancen=();

push(@chancen, $hand[0]);
push(@chancen, $hand[1]);
push(@chancen, $hand[0]+$hand[1]);
push(@chancen, $hand[2]);
push(@chancen, $hand[0]$hand[2]);
push(@chancen, $hand[1]+$hand[2]);
push(@chancen, $hand[0]+$hand[1]+$hand[2]);
push(@chancen, $hand[3]);
push(@chancen, $hand[0]+$hand[3]);
push(@chancen, $hand[1]+$hand[3]);
push(@chancen, $hand[0]+$hand[1]+$hand[3]);
push(@chancen, $hand[2]+$hand[3]);
push(@chancen, $hand[0]+$hand[2]+$hand[3]);
push(@chancen, $hand[1]+$hand[2]+$hand[3]);
push(@chancen, $hand[0]+$hand[1]+$hand[2]+$hand[3]);