yjz764297625的博客

目的：将参数代表的文件中的内容正序和反序输出来 程序在one文件中，代码如下：#! /usr/bin/perluse strict ;use warnings ;my $count = 0 ;my @contents ;while (defined(my $line = <>)){ $count += 1 ; pus...

while (defined(my $line = <>)){ $count += 1 ; push @contents , $line ; print "$line" ;}print "===========reverse print================\n";while(@contents>0){ print(pop(@conten