Select Code to Download

   DRIVER => [ 'DBI',
    ...
...
    DRIVER => [ 'Authen::Simple::LDAP',
    ...
    ],

     DRIVER => [
         [ 'Generic', { user1 => '123' } ],
         [ 'Generic', sub { my ($u, $p) = @_; is_prime($p) ? 1 : 0 } ]
     ],