my @prereq = qw(DBI DBIx::AnyDBD); for my $prereq (@prereq) { eval "use $prereq" ; die "\nPlease install $prereq before installing DBSchema::Sample" if ($@) ; my $v = "\$${prereq}::VERSION"; # LINE 115 my $v2 = eval $v; print "Found $prereq version $v2\n" ; # LINE 117 }