文件分割

biobaby

大家好，我现在有这样一个文件file.txt，
1        a        106330508        106552271
2        g        139915091        178770898
2        f        96245309        138651741
2        b        108294960        180687459
3        g        109906376        161551890
3        r        112375484        170893472
想按照第一列将文件切割成多个文件，也就是file.txt按照第一列的不同切割成1.txt, 2.txt, 3.txt, ...N.txt等多个文件。

请问各位大神，如何能够实现？
谢谢

moperyblue

1. awk '{print > $1".txt"}' file.txt

复制代码

haooooaaa

1. while read line;do echo "$line">${line%% *}.txt; done<filename

复制代码

moperyblue

1. find -type f ! -name *file.txt|xargs rm -rf #先删除之前已产生的文件,如果目录中有除file.txt之外的文件需要保留,则根据具体情况调整删除规则
   
2. while read a b; do echo "$b" >> "$a".txt; done < file.txt

复制代码

sunzhiguolu

1. #!/usr/bin/perl
   
2. use strict;
   
3. use warnings;
   
4. 
   
5. my @aData = ();
   
6. while (<DATA>){
   
7.     my ($pos) = (split)[0];
   
8.     push (@{$aData[$pos]}, $_);
   
9. }
   
10. 
    
11. for (1 .. $#aData){
    
12.     open (my $FHw, '>', $_ . '.txt');
    
13.     print $FHw @{$aData[$_]};
    
14.     close ($FHw);
    
15. }
    
16. 
    
17. __DATA__
    
18. 1        a        106330508        106552271
    
19. 2        g        139915091        178770898
    
20. 2        f        96245309        138651741
    
21. 2        b        108294960        180687459
    
22. 3        g        109906376        161551890
    
23. 3        r        112375484        170893472

复制代码

alunfirst

cat test | awk '{print "echo "$2" "$3" "$4" >> "$1".test"}'|sh

biobaby

回复 2# moperyblue

太厉害了 谢谢

biobaby

回复 3# haooooaaa

谢谢

biobaby

大家都好厉害呀  我咋就写不出来呢，

moperyblue

awk中的文件重定向符(">")与shell中的还是有点区别的