adding random number to input tag

I'm using a perl cgi script which generates input tags for a form.  I'd like the value for one of the input tags to be randomly generated.
ie.

print "<TD><INPUT NAME=\"Filename\" TYPE=\"text\" SIZE=\"25\" MAXLENGTH=\"25\" value=\"I'd like a random number here\"></TD></TR>\n";

In the above Input tag, I'd like the "value" portion to be a random number of at least 8 digits.  Can someone help me? :)
kenneth022597Asked:
Who is Participating?
 
b2piCommented:
Make sure you're using perl5.004 or later. Assuming that you want an integer:

print substr(sprintf("%.8f",rand(1.0)),2)

If you're using a perl before 5.004, add a call at the top of your program (call it only once)

srand($$ + time);


0
 
kenneth022597Author Commented:
Edited text of question
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.