#!/usr/bin/perl use warnings; use strict; while (1) { sleep 5; print "interval"; } [download]
In reply to sleep in infinite loop by my_nihilist