Problem:

Grab the current list of assigned country codes from iana.org.

Solution:

Pipe the output of wget through a regular expression, grabbing the country and TLD

Sample line:        

>.bg  –  Bulgaria</A>




Parser:
[]$ wget -q -O - http://www.iana.org/cctld/cctld-whois.htm \
    | perl -ne 'print "\t\n" if />\.(\w\w).*?(\w+)</;'