一行代码解决 perl输入 排序 输出问题

先来看基本的方法：

代码如下：

chomp(@strings=<STDIN>);  
@strings=sort @strings;  
print "@strings\n.";

只用一行代码即完成的写法：

代码如下：

print sort<STDIN>;

得到相同的结果，相当给力哦。