PERL语言入门:第三章:列表与数组:sort, reverse用法

#!/usr/bin/perl -w
#reverse 反序一个数组或列表
#sort 排序数组
#注意，这两个函数并不会修改原数组， 要得到调整后的数，请另保存

@test = qw/user root localhost password etc passwd/;
print "@test\n";
#my @a = sort @test;
#print "@a\n";
print ((sort @test), "\n");
#注意这里不能写成:print sort @tst, "\n"; ，要不sort就会拿@test与"\n"两个一起进行排序了
print "@test\n";
print "定义一个列表:\n";
@test = 1..10;
print "@test\n";

print sort @test;
print "\n";
print reverse @test;
print "\n";