两个文件拼一个

yueli7

各位大侠，

1.txt

ATCGTCGAGTCGA
GTCGTAGCT
CGATGCTAACTCAA
CGATCGATCAGCAT

2.txt

23        45
34        76
34        67
37        78

输出文件

ATCGTCGAGTCGA        23        45
GTCGTAGCT        34        76
CGATGCTAACTCAA        34        67
CGATCGATCAGCAT        37        78

文件是用TAB键分隔。原本想用excel，其实1.txt数据很长。

十分感谢！       

huang6894

=> paste hh1 hh2
ATCGTCGAGTCGA   23        45
GTCGTAGCT       34        76
CGATGCTAACTCAA  34        67
CGATCGATCAGCAT  37        78
？？？

yueli7

十分感谢！

昨天就是您帮我回答问题。

再次感谢！

kggg

一个简单的perl

1. #!/usr/bin/perl
   
2. 
   
3. open(A, 'a.txt') or die;
   
4. open(B.'b.txt') or dir;
   
5. my @b = <B>;
   
6. my @c;
   
7. for my $k(<A>){
   
8.   chomp $k;
   
9.   push @c, $k."\t".(shift @b);
   
10. }
    
11. print @c;

复制代码