foreach $ts ($te->table_states) {
  print "Table found at ", join(',', $ts->coords), ":\n";
  foreach $row ($ts->rows) {
    print "   ", join(',', @$row), "\n";
  }
}