Tivoli : : AccessManager : : Admin : : Le projet de serveur met en application la partie d'accès de serveur du TAM api.

SYNTHÈSE

mon $tam = Tivoli : : AccessManager : : Admin->new (=> N3ew0nk de mot de passe) ;
mon ($server, $resp) ;

# laisse voir quels serveurs sont définis
$resp = Tivoli : : AccessManager : : Admin : : Server->list ($tam) ;

# laisse trouver un webSEAL
mon $wseal ;
pour ($resp->value) {
si (/webseal/) {
$wseal = $_ ;
bout ;
}
}

$server = Tivoli : : AccessManager : : Admin : : Server->new ($tam, $wseal) ;

# obtenir une liste de tâches du webSEAL
$resp = $server->tasklist ;

# accomplir une tâche
$resp = $server->task (« liste ») ;