use AnyEvent;
sub loop {
  AnyEvent->timer (after => 10, 
                   cb => sub {<i>do_something_here</i>;
                              &loop;});

loop();