use List::Util qw(max); my $max = max(2, 3, 8, 5, 10); print $max; #結(jié)果為10 同樣道理,使用List::Util模塊提供的min子程序,可求最小值: 復(fù)制代碼代碼如下: use List::Util qw(min); my $min = min(2, 3, 8, 5, 10); #最小值為2 【例04】對一組字符串進行排序 如果用常規(guī)方...
www.dbjr.com.cn/article/671...htm 2025-5-23