domains, top level, collecting a list of



Is there a perl way, verses finding a published list, to collect
current top level domain names?

Thanks.
.