Mit Perl rechnen - #111856 (Allgemeines zu Perl)

Ronnie

2008-07-04 19:51

User since
2003-08-14
2022 Artikel
BenutzerIn
[default_avatar]

Zu der Problemstellung Primzahlen, sollten sich dutzende Lösungen hier im Forum finden. Auf jeden Fall empfehle ich das Buch: "Einführung in Perl" erschienen bei O'Reilly. Als Anregung dient dir evtl. folgendes Snippet:

Code (perl): (dl )

#!/usr/bin/perl

use strict;
use warnings;

use Data::Dumper;

sub is_prime {
    my $i = shift;
    die if $i < 2;
    
    return 2 if $i == 2;    
    $i % $_ == 0 and return for 2..(($i/2)+1);
    return $i;
}

my $number  = shift @ARGV || 129;
print Dumper [grep is_prime($_), 2..$number];