Quote

aus: perldoc -f srand
If srand() is not called explicitly, it is called implicitly at
the first use of the "rand" operator. However, this was not the
case in versions of Perl before 5.004, so if your script will
run under older Perl versions, it should call "srand".