You are welcome, Pangaea, and Merry Christmas to you too! Oh, I edited it again. I've just realized I could have simply used:
on $*:TEXT:/((?<=\41)\w+)-star\s(\S+)/iS:#: {
:P