hi,
hmm... ist ne ueberlegung wert. das ist natuerlich sehr sauber...
Ab in ein Modul damit:
package Forum;
my $inifile = 'forum.ini';
use strict;
require Exporter;
use Config::IniFiles;
use vars qw(
@ISA
@EXPORT
@EXPORT_OK
$cfg
);
$cfg = getvars($inifile);
@EXPORT = qw(
$cfg
);
die vars.ini einlesen
sub getvars{
my $inifile = shift;
# hash mit Variablen binden
my %vars;
tie %vars, 'Config::IniFiles', ( -file => $inifile );
return %vars;
}
nur mal als Beispiel...
roro