a code challenge at http://forrst.com/posts/Code_challenge_Four_in_a_Row-03W

four in a row.rb

s='+---+---+---+---+---+---+---+
|   |   |   |   |   |   |   |
+---+---+---+---+---+---+---+
|   |   | R |   |   |   |   |
+---+---+---+---+---+---+---+
| R |   | R | W |   |   | R |
+---+---+---+---+---+---+---+
| R |   | W | W |   |   | W |
+---+---+---+---+---+---+---+
| W | W | R | R |   |   | R |
+---+---+---+---+---+---+---+
| W | W | R | R | W | W | R |
+---+---+---+---+---+---+---+
| W | W | R | W | R | R | W |
+---+---+---+---+---+---+---+'.gsub(/.*\+\n/,'').gsub(/   |\n/,'X').tr('| ','')
%w'W R'.map{|l|[0,6,7,8].map{|n|p l if s=~/(#{l}.{#{n}}){4}/}}