Select Code to Download

    my %objects;
    for my $class (qw(Report::object1 Report::object2)) {
...
      $objects{$class} = $class->new;
    }

use autouse qw(Report::object1 Report::object1::new);
use autouse qw(Report::object2 Report::object2::new);