Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

...
  unless (-e $newfn) {print " .. $newfn doesnt exist \n";}
  return $ok;  
  } #
  2. or download this
    /saveit/md5test/huh.saveit exists 
rename /saveit/md5test/huh.saveit,/saveit/md5test/bkup1-huh.saveit
Cant rename /saveit/md5test/huh.saveit /saveit/md5test/bkup1-huh.savei
+t No such file or directory
 .. /saveit/md5test/bkup1-huh.saveit doesnt exist