piet: Auslagern von Variablen

Beitrag lesen

Hallo,

ich möchte gerne immer benötigte Variablen auslagern.
Wie ich eine externe Funktion (Funktion in anderen "Datei") mit use initialisiere und dann aufrufe/anspringe weiß ich.

Wie stelle ich es aber an das nur durch use xyz die Variablen initialisiert werden.

Ich kann es schlecht erklären hier ein Beispiel.
#################################################

allgemein.pm

my $host = split(/\./,hostname);  
....  
....  
....

Wenn ich nun in meinem Hauptprogramm

use allgemein;

Aufrufe sollte der Code für die Variable $host ausgeführt sein... also nur durch use ohne Aufruf einer speziellen Funktion.
Danach möchte ich auf die Variable $host im Hauptprogramm zugreifen können... nur wie.

Ich weiß nicht ob das überhaupt geht.... aber sicher ähnlich möglich. Vielleicht gibt es eine "Initialisierungfunktion" für allgemein.pm

Grüsse
       piet