open my $fh, '+<', $file
  or die "Unable to open '$file': $!\n";