home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl560.zip / t / comp / cpp.t < prev    next >
Text File  |  1999-07-20  |  420b  |  19 lines

  1. #!./perl
  2.  
  3. # $RCSfile: cpp.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:18 $
  4.  
  5. BEGIN {
  6.     chdir 't' if -d 't';
  7.     unshift @INC, '../lib';
  8. }
  9.  
  10. use Config;
  11. if ( $^O eq 'MSWin32' or
  12.      ($Config{'cppstdin'} =~ /\bcppstdin\b/) and
  13.      ( ! -x $Config{'binexp'} . "/cppstdin") ) {
  14.     print "1..0 # Skip: \$Config{cppstdin} unavailable\n";
  15.     exit;         # Cannot test till after install, alas.
  16. }
  17.  
  18. system "./perl -P comp/cpp.aux"
  19.