use List::AllUtils qw( sample );
my @selected = sample $numOfRandFiles, @audioFiles;