while(1) 
    {
       # delete all *.tmp files at c:\temp
       unlink( glob( "c:\\temp1\\*.txt" ) ); 
       #keep_alive();
       sleep(5); # and wait
       #last unless keep_alive();
       Log("PRINTING");
    }