Readable

bubkis.rb

p Array
.new(10000){Array.new(6){rand(1..6)}}
.reject do |roll|
  roll.include?(1) ||
    roll.include?(5) ||
      roll.select{ |die| roll.count(die) > 2 }.any? ||
        roll.sort.chunk_while{ |previous_die, current_die| previous_die == current_die }.count != 4 }
end
.count.to_f/10000