my @prereqs = qw(DBI DBIx::AnyDBD);

foreach my $prereq (@prereqs)
{
    eval "use $prereq;";
    die "Blah\n" if $@;

    my $v = $prereq->VERSION;
    print "Found $prereq version $v\n";
}