home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl_utl.zip / pod2text.cmd < prev    next >
OS/2 REXX Batch file  |  1997-11-28  |  218b  |  14 lines
  1. extproc perl -S
  2. #!f:/perllib/bin/perl
  3.     eval 'exec f:/perllib/bin/perl -S $0 ${1+"$@"}'
  4.     if $running_under_some_shell;
  5.  
  6. use Pod::Text;
  7.  
  8. if(@ARGV) {
  9.     pod2text($ARGV[0]);
  10. } else {
  11.     pod2text("<&STDIN");
  12. }
  13.  
  14.