#!/usr/bin/perl
print"enter some lines,then press Ctrl-z:/n";
@lines=<STDIN>;
@reverse_lines=reverse(@lines);
print"the lines is:",@reverse_lines;
print"enter some lines,then press Ctrl-z:/n";
@lines=<STDIN>;
@reverse_lines=reverse(@lines);
print"the lines is:",@reverse_lines;
165

被折叠的 条评论
为什么被折叠?



