BEGIN {
   my $mod = "DBI";
   if (eval "require $mod") {
      $mod->import();
      # Set flags, etc.
   } else {
      # Set flags, etc. here.
   }
}