open (FILE, "<", $file) # legal 5.6 only use warnings; # legal 5.6 only