输入一些字符串, 并输出。
#!/usr/bin/perl -w
#读入字符串并输出
chomp(@test=<STDIN>);
print "@test\n";
print "Now let me reversed the list.\n";
print ((reverse @test)."\n");//反向输出字符串
输入一些字符串, 并输出。
#!/usr/bin/perl -w
#读入字符串并输出
chomp(@test=<STDIN>);
print "@test\n";
print "Now let me reversed the list.\n";
print ((reverse @test)."\n");//反向输出字符串