Such mal im www nach 'Sieb von Eratosthenes', dort findest du jede Menge Lösungen, wie man Primzahlen findet. Wenn du noch den Begriff 'perl' hinzufügst, dann gibt es sogar schon Lösungen, z.B. in Wikipedia oder auch unter Perl-Community.