Revision 76c486e3
Von Sven Schöling vor etwa 15 Jahren hinzugefügt
SL/User.pm | ||
---|---|---|
445 | 445 |
|
446 | 446 |
$dbh->begin_work(); |
447 | 447 |
|
448 |
# setup dbup_ export vars |
|
448 | 449 |
my %dbup_myconfig = (); |
449 | 450 |
map({ $dbup_myconfig{$_} = $form->{$_}; } |
450 | 451 |
qw(dbname dbuser dbpasswd dbhost dbport dbconnect)); |
Auch abrufbar als: Unified diff
Und wieder ein Schwung strict.