if (open(FH, "< $file") {
  do fun stuff with file
  close(FH);
}
else {
  log error to some log file
  possibly display error message
}
continue on ..