[ ~/tmp ] $ perl -wle 'use strict; print join("", "fred.pl", "?dummy=", rand)'
fred.pl?dummy=0.67350901065311
[ ~/tmp ] $ perl -wle 'use strict; print join("", "fred.pl", "?dummy=", rand)'
fred.pl?dummy=0.079789433236332
[ ~/tmp ] $ perl -wle 'use strict; print join("", "fred.pl", "?dummy=", rand)'
fred.pl?dummy=0.844672383115725
[ ~/tmp ] $ perl -wle 'use strict; print join("", "fred.pl", "?dummy=", rand)'
fred.pl?dummy=0.288386549874307
[ ~/tmp ] $