# New Ticket Created by Dave Rolsky # Please include the string: [perl #126740] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=126740 >
Given this code: =begin pod =begin table :caption('My caption') Title | Name | Size ========================== Captain | Jane | Medium Clerk | Bob | Large =end table =end pod dd $=pod[0]; Here is the output of the code above: Pod::Block::Named $var = Pod::Block::Named.new(name => "pod", config => {}, contents => [Pod::Block::Table.new(caption => Any, headers => ["Title", "Name", "Size"], config => {:caption("'My caption'")}, contents => [["Captain", "Jane", "Medium"], ["Clerk", "Bob", "Large"]])]) I would expect that the Pod::Block::Table node would have a caption. The caption ends up in $node.config<caption>, but not $node.caption.