$table =~/(?|
          (?: ([12]) (?=      \1      \1      \1) ) | # (1)
          (?: ([12]) (?= .{7} \1 .{7} \1 .{7} \1) ) | # (2)
          (?: ([12]) (?= .{6} \1 .{6} \1 .{6} \1) ) | # (3)
          (?: ([12]) (?= .{8} \1 .{8} \1 .{8} \1) )   # (4)
          )/xs