BEGIN {
   use Benchmark;
   use vars qw($bench1);

   $bench1 = new Benchmark;
 }