要求: 编写一个perl程序，将各行的内容反序输出，假如你的perl程序名称为tac, 当运行./tac 1.txt 2.txt 时，结果应该输出2.txt的末行到首行，1.txt的末行到首行。
- #! /usr/bin/perl
- while (<>) {
- $a[$n]=$_;
- $n+=1;
- }
- @b=reverse @a;
- print @b;
编辑回复