# [R], <s>119</s> 117 bytes, score=<s>24</s> 22
Thanks to Dominic van Essen for spotting a bug.



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

    cat('Hello, Wo',intToUtf8(nchar("#$%&*-./012479:;<>?@ABDEFGIJKLMNOPQRSVXYZ[]^_`bgjkmquvwyz{|}~")+53),"\x6Cd!",sep="")

[Try it online!][TIO-klkr0dju]

[R]: https://www.r-project.org/
[TIO-klkr0dju]: https://tio.run/##K/r/PzmxREPdIzUnJ19HITxfXSczryQkP7QkzUIjLzkjsUhDSVlFVU1LV0/fwNDIxNzSytrGzt7B0cnF1c3d08vbx9fPPyAwKDgsIjIqOjYuPiEpPSs7t7C0rLyyqrqmtk5JU9vUWFNHKabCzDlFUUmnOLXAVklJ8/9/AA "R – Try It Online"

Uses the [hex code trick](https://codegolf.stackexchange.com/a/191117/86301) to encode the last `l` as `\x6C`. This saves 2 bytes: 1 by avoiding the reuse of the `l` (none of the other characters are used anywhere else), and 1 by avoiding having to escape the `\` (as `\\`) in the string.

The long string in the middle is 61 characters long. They are all necessary to get the character `r` (ASCII code 114), which is produced by the `intToUtf8(nchar("...")+53)` part.