[perl #132341] [BUG] Pod 6 table handling should ensure table rows have the same number of cells even if they are empty

[via RT]

# New Ticket Created by  Tom Browder 
# Please include the string:  [perl #132341]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=132341 >


Consider the following pod 6 tables:

=begin table
a | b | c
m | n | o
x | y
=end table

my $r =  $=pod[0];
is $r.contents.elems, 3;
is $r.contents[0].join(','), 'a,b,c'; # 3 cells
is $r.contents[1].join(','), 'l,m,n'; # 3 cells
is $r.contents[2].join(','), 'x,y';    # 2 cells; should change to
"x,y," after a fix for this bug  (3 cells vs 2)

=table
    X | O |
   ---+---+---
      | X | O
   ---+---+---
      |   | X

$r = $=pod[1];
is $r.contents.elems, 3;
is $r.contents[0].join(','), 'X,O';   # 2 cells; should change to
"X,O," after a fix for this bug (3 cells vs 2)
is $r.contents[1].join(','), ',X,O';  # 3 cells
is $r.contents[2].join(','), ',,X';     # 3 cells