meltdown.rb

tiles = {}
STDIN.readlines.map.with_index do |line, y|
  x = 0
  line.chomp.split(".").each do |segment|
    unless segment.empty?
      tile = [x, segment.size, segment[0]]

      if value = tiles[tile]
        tiles[tile] = [value.first, value.last + 1]
      else
        tiles[tile] = [y, 1]
      end
    end

    x += segment.size + 1
  end
end

tiles.sort_by { |(x, _, _), (y, _)| [x, y] }.each do |(x, width, character), (y, height)|
  puts "(#{width}x#{height}) tile of character '#{character}' located at (#{x},#{y})"
end