in reply to Perl daemon ?

Maybe Schedule::Cron is what you are looking for.

print+qq(\L@{[ref\&@]}@{['@'x7^'!#2/"!4']});