if (-e $filename) {
  open(FH, $filename);
}