open(BIGFILE, "+>$filename") || die ("Could not create $filename.\n");