Thread Exportierte Variable hat keinen Wert (3 answers)
Opened by Gast at 2006-01-28 23:29

GwenDragon
 2006-01-28 23:49
#62393 #62393
User since
2005-01-17
14806 Artikel
Admin1
[Homepage]
user image
So gehts ;)

Alle Variablen des Packages mit use vars qw () "voranmelden".

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
package db_data;

use strict;
use vars qw(@EXPORT_OK @ISA);
use Exporter;
@ISA = qw(Exporter);
@EXPORT_OK = qw($DB_URL $DB_USER $DB_PASSWD);

use vars qw( $DB_NAME
$DB_HORST
$DB_PORT
$DB_USER
$DB_PASSWD
$DB_URL
);

$DB_NAME = "testdb";
$DB_HORST = "localhost";
$DB_PORT = "3306";
$DB_USER = "Test";
$DB_PASSWD = "Test";
$DB_URL = "DBI:mysql:database=$DB_NAME;host=$DB_HORST;port=$DB_PORT";

1;

View full thread Exportierte Variable hat keinen Wert