对于一个数组,随机获取其中一个或多个元素。
- 利用List::Util 模块中的shuffle,这将对数组进行随机排序,需要随机取多少个元素就提起前几个元素随机排序的元素。
use List::Util qw(shuffle);
my @data = ("a", "b", "c", "d");
my @rand_data = shuffle(@data);
my @rand_select_data = @rand_data[0..1];
map {print "$_\n"}@rand_select_data;
- 利用rand函数
网友评论