This commit is contained in:
Yanick Champoux 2017-12-17 11:39:52 -05:00
parent 3581d429e6
commit df6a180b91

14
17/1.pl Normal file
View File

@ -0,0 +1,14 @@
use 5.20.0;
my $i = 380;
my @v = (0);
my $p = 0;
use DDP;
for(1..2017) {
$p = ( 1 + $p + $i ) % @v;
splice @v, $p, 0, $_;
}
p @v;