Select Code to Download

use strict;
use warnings;
...
    my ($count, $range) = @_;
    return map { scalar_func($range) } 1 .. $count;
}

A random number from 1 .. 10:
1
...
3110103
Print all of them on a single line, with commas
3, 1, 10, 10, 3