Hvorfor virker denne kode ikke?
Hej eksperter.Jeg har fundet denne glimrende guide til at sætte subdomæner op i apache, men den virker ikke http://linux-support.dk/index.php?id=4
Kode:
<Perl>
use DBI;
# Declare and initialize variables
$host = 'localhost';
$db = 'domains';
$db_user = 'apache';
$db_password = '';
$server_admin = 'root@linux-support.dk';
# Connect to the requested server
$dbh = DBI->connect("dbi:mysql:$db:$host", "$db_user", "$db_password");
$sth = $dbh->prepare("SELECT domain, docroot FROM vhosts ORDER BY domain ASC");
$sth->execute();
while (($domain, $docroot) = $sth->fetchrow_array()) {
system("/bin/mkdir -p $docroot");
system("/bin/mkdir -p $docroot/logs/");
push @{$VirtualHost{'*'}}, {
ServerName => "$domain",
ServerAlias => "www.$domain $domain",
ServerAdmin => "$server_admin",
DocumentRoot => "$docroot",
ErrorLog => "$docroot/error.log",
CustomLog => ["$docroot/access.log", "combined"],
};
}
</Perl>
den laver ingen fejl, men den virker heller ikke.
Jeg har oprettet følgende i databasen:
id domain docroot
1 wh4u.dk /www/webhost4u/users/goldie
det skulle gerne resultere i at dette subdomæne virker http://goldie.wh4u.dk men det virker ikke
jeg kører apache 1.3, med libapache-mod-perl.
Nogen som kan hjælpe?
Hvis der skal $$ på bordet så skriv lige.
Mvh
Michael Guldhammer