if ( -e "$file" ) open ( FH0, '<./$file' )