my @first = map { 5 * $_ + 2 } 0..3; my @second = map { 5 * $_ + 3 } 0..3;