aboutsummaryrefslogtreecommitdiff
path: root/challenge-109/lance-wicks/perl/ch-1.pl
blob: ddbb11ad8a22eeeb64201384e14d9d5bf5eebe2b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
use strict;
use warnings;

use lib './lib';
use Chowla;

my $c = Chowla->new;
my $numbers = $c->list(20);

for my $n (@$numbers) {
    print "$n, ";
}