die("Could not open file $file: $!\n");