Select Code to Download

for my $dbh ( @dbf ) {
    die $@ if ! eval "use $dbf; 1";
}

BEGIN {
    my @dbf = ...;
...
        $dbf->import();
    }
}