Need to parse the stand-alone ipv6 address in server field #12
Description
decode $ p ":fe80::6924:2274:ecbb:a5e4 001 nick :Welcome to the Internet Relay Chat Network nick"
Just (Message {msg_prefix = Just (NickName "fe80::6924:2274:ecbb:a5e4" Nothing Nothing), msg_command = "001", msg_params = ["nick","Welcome to the Internet Relay Chat Network nick"]})