In some regards, I'm a very old school person. For example I do not like the concept of streaming audio (via Spotify et.al.). I want MP3s on my hard disk (and/or vinyl on my record player). I want access to my music when I'm offline (and I'm offline a lot) and without using a so-called smart phone (I prefer vintage USB-stick MP3 players). My ...
[ more ]

Erledigen wir mal das unvermeidliche: Corona-Songs! Von dem sehr gut gefüllten Quarantunes-Sampler (7 Alben!) habe ich den Subterranean Shut-In Blues (01) von Mattiel ausgesucht, weil es das beste Dylan-Lied paraphrasiert. Bibiza ist im Corona Song (02) brav am Händewaschen. Müßiggang suchen die positiven Seiten der Krisa am verhatschten Samstag ...
[ more ]

This was another fun one. It took me some time to get the logic right (or left?), but in the end I came up with a nice solution. BTW, this will be the last daily blog post, as I'll have to finish some work projects, and start with some holiday projects. https://adventofcode.com/2020/day/12 Part 1 my @in = map { [/^(\w)(\d+)$/] } <>; my ...
[ more ]

Finally, some Game of Life https://adventofcode.com/2020/day/11 Part 1 Today I needed quite a bit of code, so let's split it up: my @map = map { chomp; [ split // ] } <>; my $h = @map; my $w = $map[0]->@*; my $occ = 0; my $max = 4; my @around = ( [ -1, -1 ], [ -1, 0 ], [ -1, 1 ], [ 0, -1 ], [ 0, 1 ], [ 1, -1 ], [ 1, 0 ], [ 1, ...
[ more ]

While the first part was ridiculously easy (after stripping away the overly complex "explanation"), I was not in the mood for doing the second part (recursion, memoization, ..) in the morning. https://adventofcode.com/2020/day/10 Part 1 We first need to sort the adapters by int value (hence the spaceship op <=>). We start with a jolt of ...
[ more ]