## [Perl 5], 195 bytes

__194 bytes code + 1 for `-p`.__

<!-- language-all: lang-perl -->

<pre><code>%h=map{$_,(A..Z,0..9)[$i++]}unpack"S26I2S7I","&#23;\xd5&#1;]&#7;u&#1;]&#1;\xdd&#1;U&#5;w&#23;\xd7&#1;u&#1;w&#29;w&#7;\xdd&#5;\xd7&#29;]&#21;&#7;WW&#1;w&#1;W&#7;w&#29;u&#7;ww&#7;ww&#1;wWw&#21;W&#5;U&#1;U&#7;\xd5&#29;uw\xdd\xdd&#1;";s/0{7}/ /g;s/(\d+?)(000|\b)/$h{oct"0b$1"}/ge
</code></pre>

TIO seems to think this only has 141 bytes, but that isn't right, not sure if that's a bug or what! I couldn't get this working with just a standard packed binary string, I had to escape the higher-byte chars otherwise I'd be on 171, if anyone knows what I've missed, or why it's breaking that'd be great!

[Try it online!][TIO-jaa7g068]

[Perl 5]: https://www.perl.org/
[TIO-jaa7g068]: https://tio.run/##bY9Ra4MwFIVvHkTYe@mTMIIDRac3BSejlLHHPhcRNmW0tbSyrcpauQPnX5/V2arbTLjknHOTL0m6@XhzSjWe4bS82c3el2muvpjao2U9mWhZ9/qzGhtGWGT7dLl@5YvJ3XyycOfc5GMIPiOHhXIGDEJWmYh5IAGNK@myjBEoQHKdS3WihDACGXzwGTFfJiWTiWQgYkA@jXzJY16921Eyqg/9AIFPDzbmbmFf29tKakFkPOgaIn4FK91Wd3myPnJcqYIX9nZTlgKbiecSovM9LURbzej7393LuQECiqvGdQQc5La6z7ok7drQ/twuxL9CHMxE974zaegvVe87SY9xsj@Ut@kJ "Perl 5 – Try It Online"