Perl/Apache Rewriting

Hej er igang med at opsætte Gratis Hosting for BF Claner

Og jeg køre Linux  med Perl/Apache mysql Alså DBI

Jeg køre Virtual Hosts sådan her

push @{$VirtualHost{'*:80'}}, {
ServerName => "$ServerName",
ServerAlias => "www.$ServerName *.$ServerName",
ServerAdmin => "$ServerAdmin",
DocumentRoot => "$DocumentRoot",
ErrorLog => "$homedir/logs/error.log",
CustomLog => ["$homedir/logs/access.log", "combined"],
Alias => "/stats $homedir/stats",
};

Men jeg vil så til føjer Rewriting for subdomain således her

push @{$VirtualHost{'*:80'}}, {
ServerName => "$ServerName",
ServerAlias => "www.$ServerName *.$ServerName",
ServerAdmin => "$ServerAdmin",
DocumentRoot => "$DocumentRoot",
ErrorLog => "$homedir/logs/error.log",
CustomLog => ["$homedir/logs/access.log", "combined"],
Alias => "/stats $homedir/stats",
### Subdumailalias
RewriteEngine => "on",
RewriteCond => "%{HTTP_HOST}                ^www\.[^.]+\.host\.com$",
RewriteRule => "^(.+)                        %{HTTP_HOST}$1          [C]",
RewriteRule => "www\.([^.]+)\.$ServerName(.*) $homedir/$1$2",
};

Men det virker ikke har også prøvet med

push @{$VirtualHost{'*:80'}}, {
ServerName => "$ServerName",
ServerAlias => "www.$ServerName *.$ServerName",
ServerAdmin => "$ServerAdmin",
DocumentRoot => "$DocumentRoot",
ErrorLog => "$homedir/logs/error.log",
CustomLog => ["$homedir/logs/access.log", "combined"],
Alias => "/stats $homedir/stats",
### Subdumailalias
RewriteEngine on
RewriteCond  %{HTTP_HOST}                ^www\.[^.]+\.host\.com$
RewriteRule  ^(.+)                        %{HTTP_HOST}$1          [C]
RewriteRule  ^www\.([^.]+)\.$ServerName(.*) $homedir/$1$2


};
</Perl>

Nogen der har en ide om hvodan man går når det er perl ?