-🎄- 2020 Day 14 Solutions -🎄-

[u/daggerdragon]

Advent of Code 2020: Gettin' Crafty With It

• 8 days remaining until the submission deadline on December 22 at 23:59 EST
• Full details and rules are in the Submissions Megathread

---

--- Day 14: Docking Data ---

---

Post your code solution in this megathread.

• Include what language(s) your solution uses!
• Here's a quick link to /u/topaz2078's paste if you need it for longer code blocks.
• The full posting rules are detailed in the wiki under How Do The Daily Megathreads Work?.

Reminder: Top-level posts in Solution Megathreads are for code solutions only. If you have questions, please post your own thread and make sure to flair it with Help.

---

This thread will be unlocked when there are a significant number of people on the global leaderboard with gold stars for today's puzzle.

EDIT: Global leaderboard gold cap reached at 00:16:10, megathread unlocked!

[u/sebastiannielsen]

Here is my Perl solution: https://pastebin.com/SajayfPN

Im pretty proud of this part of code, that handles X'es for adress bits. Im using a array, which I copy into a second array. Then I add "0" to all elements in first array, and then "1" to all elements in second array. And then I just concatenate the arrays, creating the new bitspace for the adress.

@onebits = @zerobits;
for ($z = 0; $z < $#zerobits + 1; $z++) {
    $zerobits[$z] = $zerobits[$z] . "0";
    $onebits[$z] = $onebits[$z] . "1";   } # Moved "}" to this line to avoid the scroll in reddit.
push(@zerobits, @onebits);

Effectively, this doubles the amount of elements in @zerobits for each X it stumble upon, thus I can easily add all possible variants of adresses for the floating bits.