foreach my $i (1..6){
            $whois = `whois`;   # Hier steht die Whois Abfrage
            print $whois;
}