Help for this page
#!/usr/bin/perl -w use strict; ... my $a = random(10,50); my $f = listprimes($a); print "$f\n";