if ($tag eq 'table') {
      ($tablenr, $row, $column) = @{ pop @save };
      --$in_table;
}