Select Code to Download

$ perl -MErrno=ENOENT -le'
   $found = -e shift;
...
   print($found ? "found" : "not found");
' foo/bar
stat: Permission denied