day8

2018/08/sol1.pl

@@ -0,0 +1,18 @@
+use 5.20.0;
+use warnings;
+use experimental qw/
+    signatures
+    postderef
+/;
+
+my @input = split / /, <>;
+
+parse_metadata(@input);
+
+sub parse_metadata($nbr_children, $nbr_metadata, @payload) {
+    my @meta;
+    push @meta, pop @payload for 1..$nbr_metadata;
+
+
+
+}

2018/08/test.txt

@@ -0,0 +1 @@
+2 3 0 3 10 11 12 1 1 0 1 99 2 1 1 2