perl script to generate ip address lists by country

There were few threads on this forum regarding this subject, I would like to share my work in this matter with you. There are free databases of IP matching to country, for example:
IP-to-Country : http://ip-to-country.webhosting.info
MaxMind GeoLite Country : http://www.maxmind.com/app/geolitecountry

Yesterday I committed a perl script which uses above databases to generate ip address list of chosen country in PeerGuardian format (ranges) - format can be easily changed. The generated list is a merge of lists from two databases because, there are differences between them, in my opinion they nicely complete each other. To get script to work you need to download ip databases from above sites in csv format and place them in script dir.

Well, I am opened for any criticism, suggestions or questions. I hope you will find this script useful.

Regards