Benchmark code for Perl user agents