my $ua = new LWP::UserAgent(agent =>"myagent");