open(VHOSTS, "<$vhosts_file") || &error("Kann die Datei $vhosts_file nicht lesen!", 1);
my $content = "";
while (<VHOSTS>){
       $content.=$_;
}
close(VHOSTS);
my @vhosts = split(/\n\n/, $content);