use LWP::Online 'online'; unless ( online('http') ) { sleep(1); }