Output
I:\>perl dnslookup.pl t4400-202.mycompany.local

Host_Name
t4400-202.mycompany.local => 192.168.100.202
	( ==> wanting to show 192.168.110.202 as well <== 

I:\>