my $randday = DateCalc($yearstart, int(rand($yeardays)) . "days");