home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl560.zip / t / pod / lref.t < prev    next >
Text File  |  1999-10-01  |  1KB  |  67 lines

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