$ua = LWP::UserAgent->new;
$ua->agent('Odyssey/2001');