#! /usr/bin/perl -w use strict; use lib '/home/mm/perl/'; use prime; foreach my $n ( 2..20 ) { print "$n ist eine Primzahl\n" if is_prime( $n ); }