eval {-r "$File1"};
if ($@) { 
    $Debug && print "File $File1 is not readable!  Return was $@.\n"; 
    return 1;
  }