Since a Test script is Perl, would it be possible for you to define a sub, either within the script or within a used module of your own devising, that would supply a random primary-key value to a designated field?

It is difficult to contemplate changing “thousands of” tests, but... c’est la guerre...