Subject: | L<http://foo> unsupported (contrary to pod) |
the snippet contained demonstrates how L<http://bar.com>
gets eated, where as
L<bar bar bar|http://bar.com> is merely dumped wrong as_pod
=head1 FOO
L<http://bar.com>
L<bar bar bar|http://bar.com>
=cut
use Pod::Compiler qw(pod_compile);
my $obj = pod_compile(__FILE__ );
print $/,$/,$obj->as_pod;
__END__