open (IN, $file) || die($!);

if (-e $file) { open (IN, $file); }