Абсолютно дикий вопрос, который можно задать лишь для того, чтобы выяснить, внимательно ли читал человек документацию по казалось бы очевидным вопросам.
Почему последовательность вызовов
perl -E'srand(rand); say rand'
печатает один и тот же результат?