my $nr = 5;
my @d = choose( [ 1 .. 20 ], { max_ret => $nr } ); 
# man kann maximal $nr Elemente auswählen  - default unbegrenzt