## [Perl 5], 42 bytes

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

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

    s//K Ks
    K unKs/;s/K/known/g;$\=s/^/un/gmr

[Try it online!][TIO-j8u9ru3m]

[Perl 5]: https://www.perl.org/
[TIO-j8u9ru3m]: https://tio.run/##K0gtyjH9/79YX99bwbuYy1uhNM@7WN@6WN9bPzsvvzxPP91aJca2WD9OvxTIzi36/5/rX35BSWZ@XvF/3QIA "Perl 5 – Try It Online"

---

# [Perl 5], 45 bytes

Tried to come up with an alternative, but couldn't make it shorter... Thought it was different enough to warrant adding anyway.

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

    print"un"x/[3467]/,known,$_%2?"s
    ":$"for 0..7

[Try it online!][TIO-j8vsfn06]

[Perl 5]: https://www.perl.org/
[TIO-j8vsfn06]: https://tio.run/##K0gtyjH9/7@gKDOvRKk0T6lCP9rYxMw8Vl8nOy@/PE9HJV7VyF6pmEvJSkUpLb9IwUBPz/z/fwA "Perl 5 – Try It Online"