perl -e 'while(1){do_something;eventually_sleep_sometime;}' &