home *** CD-ROM | disk | FTP | other *** search
/ ftp.cse.unsw.edu.au / 2014.06.ftp.cse.unsw.edu.au.tar / ftp.cse.unsw.edu.au / pub / doc / languages / perl / nutshell / apb / validate < prev   
Encoding:
Text File  |  1992-10-18  |  325 b   |  13 lines

  1. require "validate.pl";
  2.  
  3. $warnings += &validate('
  4. /vmunix                 -e || die
  5. /boot                   -e || die
  6. /bin                    cd
  7.     csh                 -ex
  8.     csh                 !-ug
  9.     sh                  -ex
  10.     sh                  !-ug
  11. /usr                    -d || warn "What happened to $file?\n"
  12. ');
  13.