列表实用工具集。 QUOTE: #!/usr/bin/perl use List::Util qw/max min sum maxstr minstr shuffle/; @s = ( 'hello', 'ok', 'china', 'unix' ); print max 1..10; #10 print min 1..10; #1 print sum 1..10; #55 print maxstr @s; #unix print minstr @s; #china print shuffle 1..10; #radom order
by: 发表于:2017-09-11 11:51:17 顶(0) | 踩(0) 回复
??
回复评论