1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
#!/usr/bin/ruby i = 0 stack = Array.new(30000){0} while c = STDIN.getc case c when '+' stack[i] += 1 when '-' stack[i] -= 1 when '>' i += 1 when '<' i -= 1 when '.' puts stack[i] when "," c = STDIN.getc when '[' puts "[" when ']' puts "]" end end