From 50bb480e3672cb6c32d4b63c7f629b78c558157b Mon Sep 17 00:00:00 2001 From: June McEnroe Date: Mon, 5 Dec 2022 10:07:05 -0500 Subject: Solve day 5 part 1 --- 2022/day05.awk | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 2022/day05.awk diff --git a/2022/day05.awk b/2022/day05.awk new file mode 100644 index 0000000..599b1a4 --- /dev/null +++ b/2022/day05.awk @@ -0,0 +1,27 @@ +{ + sub("^ ", "[.] "); + gsub(" ", " [.]"); +} +/^\[/ { + for (i = 1; i <= NF; i++) { + x = substr($i, 2, 1); + if (x == ".") continue; + a[i] = a[i] x; + } +} +/^move/ { + count = $2; + from = $4; + to = $6; + for (i = 1; i <= count; i++) { + x = substr(a[from], 1, 1); + a[from] = substr(a[from], 2); + a[to] = x a[to]; + } +} +END { + for (i = 1; a[i]; i++) { + printf substr(a[i], 1, 1); + } + printf "\n"; +} -- cgit 1.4.1