1BEGIN { 2 use File::Basename; 3 my $THISDIR = dirname $0; 4 unshift @INC, $THISDIR; 5 require "testp2pt.pl"; 6 import TestPodIncPlainText; 7} 8 9my %options = map { $_ => 1 } @ARGV; ## convert cmdline to options-hash 10my $passed = testpodplaintext \%options, $0; 11exit( ($passed == 1) ? 0 : -1 ) unless $ENV{HARNESS_ACTIVE}; 12 13 14__END__ 15 16 17=pod 18 19Try out I<LOTS> of different ways of specifying references: 20 21Reference the L<manpage/section> 22 23Reference the L<manpage / section> 24 25Reference the L<manpage/ section> 26 27Reference the L<manpage /section> 28 29Reference the L<"manpage/section"> 30 31Reference the L<"manpage"/section> 32 33Reference the L<manpage/"section"> 34 35Reference the L<manpage/ 36section> 37 38Reference the L<manpage 39/section> 40 41Now try it using the new "|" stuff ... 42 43Reference the L<thistext|manpage/section> 44 45Reference the L<thistext | manpage / section> 46 47Reference the L<thistext| manpage/ section> 48 49Reference the L<thistext |manpage /section> 50 51Reference the L<thistext| 52"manpage/section"> 53 54Reference the L<thistext 55|"manpage"/section> 56 57Reference the L<thistext|manpage/"section"> 58 59Reference the L<thistext| 60manpage/ 61section> 62 63Reference the L<thistext 64|manpage 65/section> 66 67