#!/usr/bin/perl -w
use strict;

use LWP::UserAgent;
my $ua = LWP::UserAgent->new(agent => "", timeout => 30);
my $response;

my $url = 'http://example.com/';

while ()
    {
    sleep 60;
    $response = $ua->get($url);
    if (not ($response->is_success))
        {
        print "Can't retrieve page: " . $response->status_line . "\n";
        next;
        }
    my $page = $response->content;

    [... process content]

    }