The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Config::Manager::PUser - liefert den Default- bzw. "Projekt"-User

SYNOPSIS

  $current_user = &current_user();

  $current_conf = &current_conf();

  $default_user = &default_user();

  $default_conf = &default_conf();

DESCRIPTION

Dieses Modul bestimmt (mit Hilfe der automatisch ausgefuehrten "BEGIN"-Funktion) die User-IDs des aktuellen (aufrufenden) und des Default-Benutzers (z.B. fuer Sende-Tools), legt die zugehoerigen Konfigurations-Objekte im Cache des Moduls "Config::Manager::User" an (ganz wichtig, weil spaeter z.B. das Modul "Config::SPU::JOB" automatisch genau auf diese gecachten Objekte zugreifen wird!) und kopiert den Wert der Konfigurations-Variablen "$Host::Platform" und "$Host::Environment" aus dem Konfigurations-Objekt des aktuellen in das des Default-Benutzers.

Ganz wesentlich ist hier, dass z.B. die Werte fuer HOST-ID und HOST-PW vorher nicht bestimmt worden sind, da sonst diese Werte im Modul "Config::Manager::Conf" gecacht wuerden und somit das Ueberschreiben der Variablen "$Host::Platform" wirkungslos bliebe.

Dies ist aber hier insofern gewaehrleistet, als durch den "use"-Mechanismus die "BEGIN"-Funktion automatisch bereits beim Hochstarten jedes (Sende-) Tools, das dieses Modul hier benutzt, ausgefuehrt wird. Das waere nur dann nicht gewaehrleistet, wenn man dieses Modul nicht mit "use" zu Programmbeginn, sondern erst spaeter mit "require" einbinden (und zudem die Variablen wie z.B. HOST-ID und HOST-PW fuer den Default-Benutzer auswerten) wuerde. Solange dieses Modul also immer mit "use" geladen wird (und warum sollte es auch nicht!), kann also nichts Schlimmes passieren.

HISTORY

 2003_02_05  Steffen Beyer & Gerhard Albers  Version 1.0
 2003_02_14  Steffen Beyer                   Version 1.1
 2003_04_26  Steffen Beyer                   Version 1.2