open hFile, '<', $filename or die "Can't read '$filename': $!\n";