Nice work! May I suggest a small improvement? In your dupcheck function you use this chop($dupcheck = `grep -ic $domain...
Separate names with a comma.
