$ pmv List::Util
1.63
$ perl -MList::Util=sample -wE 'my @x=("a".."z"); say sample (3, @x)'
jso
$ perl -MList::Util=sample -wE 'my @x=("a".."z"); say sample (3, @x)'
ter
$ perl -MList::Util=sample -wE 'my @x=("a".."z"); say sample (3, @x)'
mgl
$ perl -MList::Util=sample -wE 'my @x=("a".."z"); say sample (3, @x)'
ago
$