523066680

use File::Slurp;
use List::MoreUtils qw/pairwise/;
my @a = grep { chomp } read_file("a.txt");
my @b = grep { chomp } read_file("b.txt");
my @c = pairwise { $a, $b } @a, @b;
grep { printf "%2d %s\n", $_+1, $c[$_]  } 0..$#c;
复制代码

B文本偶数行，含行号

 1 A
 2 B
 3 A1
 4 B1
 5 A2
 6 B2
 7 
 8 B3
 9 
10 B4
复制代码

523066680

回复 11# tigerpower

    在 MSYS 2 和 BusyBox 分别试了一下，行为不一样
msys的 paste 会把B的内容固定在偶数行（会预留间隔空行），busybox 的 paste 将不会预留那些间隔。