| Automobile Un quadro di autorizzazione con backend flessibili e UIS. |
Scarica ora |
Automobile Classifica e riepilogo
- Licenza:
- Perl Artistic License
- Nome editore:
- Hans Oesterholt-Dijkema
- Sito web dell'editore:
- http://search.cpan.org/~oesterhol/Wx-Polygon-0.06/Polygon.pm
Automobile Tag
Automobile Descrizione
Un quadro di autorizzazione con backend flessibili e UIS. AUT è un quadro di autorizzazione basato sui perl con backend flessibile e UIS.Synopsis utilizza Aut; Usa Aut :: Ui :: Console; Usa Aut :: Backend :: Conf; Utilizzare Config :: Frontend; Usa Config :: Backend :: INI; usare rigoroso; My $ CFG = Nuovo Config :: Frontend (Nuova configurazione :: Backend :: INI ("./ ACCONTI.INI")); My $ Backend = New Aut :: Backend :: Conf ($ cfg); MY $ UI = Nuovo Aut :: Ui :: Console (); My $ AUT = Nuovo Aut (Backend => $ Backend, UI => $ UI, RSA_BITS => 512, livelli => , adminlevel => "admin"); My $ Ticket = $ Aut-> ticket_get ("admin", "testpass"); se (non $ ticket-> Valido ()) {$ Ticket = New Aut :: Ticket ("Admin", "testpass"); $ ticket-> set_rights ("admin"); $ Aut-> ticket_create ($ ticket); } $ ticket = $ aut-> login (); Stampa "Account:", $ ticket-> account () " "; stampa" diritti ":", $ ticket-> diritti () " "; IF ($ UI-> IS_ADMIN ($ Ticket)) {$ AT-> admin ($ ticket);} else {$ u->> messaggio_ok (_t (" Non hai diritti di amministratore "." Non è possibile somministrare account. "));} Stampa" Account: ", $ ticket-> account ()" "; stampa" diritti ":", $ ticket-> diritti () " "; $ Aut-> Change_pass ($ ticket); Requisiti: · Python.
Automobile Software correlato