Subject: | bad POD in Text::Autoformat |
The =begin / =cut block used in Autoformat.pm breaks the POD formatting
of all recent formatters (pod2man, perldoc, tkpod). It should be removed
completely (e.g. using comments) or rephrased like this:
=begin other
print STDERR "[", join("|", $para->{raw} =~
/ \A(\s*) # $1 - leading whitespace (quotation)
(["']|``) # $2 - opening quotemark
(.*) # $3 - quotation
(''|\2) # $4 closing quotemark
\s*?\n # trailing whitespace
(\1[ ]+) # $5 - leading whitespace (attribution)
(--|-) # $6 - attribution introducer
([^\n]*?$) # $7 - attribution line 1
((\5[^\n]*?$)*) # $8 - attributions lines 2-N
\s*\Z
/xsm
), "]\n";
=end other
=cut
Then perldoc and tkpod will show the correct POD.
Thanks a lot and all the best,
Marek