Chinaunix

标题: 文件拆分求教 [打印本页]

作者: yss624 时间: 2015-12-08 11:19
标题: 文件拆分求教
本帖最后由 yss624 于 2015-12-08 11:22 编辑

比如file文件内容是：
7
ABC
dvvvf
live
verer
vvvv
dft54
test

第一行是文件的行数，现在要求每两行拆分一个文件，形成file_1 ,file_2 ,file_3 ,file_4,并且拆分后，每个文件的第一行的内容是行数。

file_1的内容是：
2
ABC
dvvvf

file_2的内容是：
2
live
verer

file_3的内容是：
2
vvvv
dft54t

file_4的内容是：
1
test

用awk可以实现吗？
谢谢。

作者: haooooaaa 时间: 2015-12-08 11:47

awk -vline=2 'function w(t){print t?e"\n"s:++e"\n"s"\n"$0 > "file_"++d;close("file_"d);s=e=""}NR>1{if(++c%line){++e;s=s?s"\n"$0:$0;next}w()}END{w(1)}' file

复制代码

作者: sync_1521 时间: 2015-12-08 13:00

awk 'NR==1{a=$1;b=2;next}!((NR-2)%b){++num;close(file);file="file_"num;s=(a-NR+2)>=b?b:(a%b);print s>file}{print >file}' file

复制代码

作者: yss624 时间: 2015-12-08 14:19

sync_1521 发表于 2015-12-08 13:00

谢谢。可用。请问这里的close(file) ,就是为了避免打开过多的文件吗？

作者: sync_1521 时间: 2015-12-08 14:41
回复 4# yss624
是的
参考二楼大神思路，写了一个非函数形式的

awk -va=2 '!((NR-2)%a){if(b){print c"\n"s>file;close(file)};file="file_"++b;s=c=""}{c++;s=s?s"\n"$0:$0}END{print c"\n"s>file}' file

复制代码

作者: jcdiy0601 时间: 2015-12-09 10:18
awk还得继续研究

#!/bin/bash
awk 'NR>1{print}' test > test.txt
split -l 2 test.txt file_.
a=1
for i in file_*
do
num=`wc -l < $i`
sed -i '1i\'$num'' $i
mv $i file_"$a"
let a+=1
done

复制代码

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)