如何用awk将大ASCII文件按指定列范围拆分输出为小文件？

直接用AWK的循环遍历列范围即可避免冗长的print语句，同时保证输出格式正确。以下是完整的可运行脚本，完美适配你的需求：

BEGIN {
    FS = " "
    OFS = " "
    cols_per_file = 50  # 每个小文件的列数
}

# 第一行确定总列数与拆分文件数量
NR == 1 {
    total_cols = NF
    num_files = int((total_cols + cols_per_file - 1) / cols_per_file)  # 向上取整计算文件数
}

# 逐行处理并拆分到对应文件
{
    for (file_idx = 0; file_idx < num_files; file_idx++) {
        start_col = file_idx * cols_per_file + 1
        end_col = (file_idx + 1) * cols_per_file
        if (end_col > total_cols) end_col = total_cols
        
        # 拼接当前文件对应的列内容
        curr_line = ""
        for (col = start_col; col <= end_col; col++) {
            curr_line = curr_line (col > start_col ? OFS : "") $col
        }
        
        # 输出到命名规范的文件（如output_01.txt、output_02.txt）
        out_file = "output_" sprintf("%02d", file_idx + 1) ".txt"
        print curr_line > out_file
    }
}

END {
    # 关闭所有文件，避免AWK打开文件数超限
    for (file_idx = 0; file_idx < num_files; file_idx++) {
        close("output_" sprintf("%02d", file_idx + 1) ".txt")
    }
}

关键细节说明 #

1. FS与OFS设置：明确指定输入分隔符FS和输出分隔符OFS为空格，确保输出格式和输入一致，避免手动拼接空格的繁琐与错误。
2. 动态计算文件数：通过第一行的列数NF计算需要拆分的文件总数，自动处理列数不是50整数倍的情况（最后一个文件包含剩余列）。
3. 循环遍历列范围：用内层循环遍历start_col到end_col的列，自动拼接成一行内容，彻底告别冗长的print $1 " " $2 ...写法。
4. 文件关闭操作：在END块关闭所有输出文件，避免AWK因打开文件数过多报错（尤其适合数千行的大文件）。

使用方法 #

将上述脚本保存为split_cols.awk，然后运行命令：

awk -f split_cols.awk your_input_file.txt

运行后会生成output_01.txt、output_02.txt等文件，每个文件最多包含50列数据。

内容的提问来源于stack exchange，提问作者Scope