Self Describing numbers

gistfile1.rb

filename = ARGV[0]

file = File.new(filename, "r")
while (line = file.gets)
  array = line.scan(/./)
  new_array = Array.new
  array.length.times do |var|
    new_array << array.count(var.to_s).to_s
  end
  if new_array.eql? array
    puts "1"
  else 
    puts "0"
  end
end
file.close