Extracts the TLD(Top Level Domain) from domain, for Common Lisp
