my @prereqs = (
        "DBI",
        "MIME::Base64");

foreach (@prereqs)
{
        if (!eval("require \($_\)"))
        {
                print "Missing prerequisite - $_\n";
                exit 0;
        }
}