# [Perl 5] `-n`, <s>44</s> 37 bytes

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

    /./&&!$k{lc$&}++&&print$_,$"for/\w+/g

[Try it online!][TIO-kr3tny60]

[Perl 5]: https://www.perl.org/
[TIO-kr3tny60]: https://tio.run/##DcPRCkAwFADQX7m0bmnYg7z4Bo8eRWJY1u6alQf5dZdTx@tga2ZVKsREHLedBT5SIvpgXBRjLtKVguovqTbmluiAYRyg/EG366Bh@ldgTYxWw0LbCU32ko@G3MmF@wA "Perl 5 – Try It Online"