Allison Randal <alli...@perl.org> writes:
> Russ Allbery wrote:

>> This is not the sort of thing that one gets to change retroactively,
>> I'm afraid, no matter how nice it would be for consistency.

> Agreed on keeping Perl 5 pod changes minimal, but I thought it always
> worked that way. Does anyone have an old pod parser around to test?

tribes:~> cat test.pod
=head1 TEST NESTED C

C<< this should be I<italic> >>
C<< this should not need escaping: $x > L<Foo>->blort >>
tribes:~> perl /usr/local/bin/pod2man test.pod | grep should
\&\f(CW\*(C`this should be \f(CIitalic\f(CW\*(C'\fR
\&\f(CW\*(C`this should not need escaping: $x > Foo\->blort\*(C'\fR
tribes:~> perl -v | head -2

This is perl, v5.8.6 built for sun4-solaris
tribes:~> perl -MPod::Man -e 'print $INC{"Pod/Man.pm"}, "\n"'
/usr/local/lib/perl5/5.8.6/Pod/Man.pm
tribes:~> grep ^'use Pod' /usr/local/lib/perl5/5.8.6/Pod/Man.pm
use Pod::ParseLink qw(parselink);
use Pod::Parser ();

So this is how it worked in Perl 5.8 with Pod::Parser.

-- 
Russ Allbery (r...@stanford.edu)             <http://www.eyrie.org/~eagle/>

Reply via email to