(map display(string-split(read-line)#/\b[Bdgt]\w*./))