in reply to Re^4: timer without modules
in thread timer without modules

It sounds as if Algorithm::TokenBucket is what you want.

In Section Seekers of Perl Wisdom