You could just use something like

sub randomInt { map { int(rand($_[2] - $_[1] + 1) + $_[1])} (1) x ($_[
+0] || 1); }
[download]