You could use your index as a seed then call rand with some appropriate value

perl -e 'for (1..10) {srand($_); print int rand (100000), $/}'

# output
51385
2770
54159
5545
56930
8319
59704
11090
62475
13864
[download]

Cheers,
R.