try someting simple like this:

for (@IP){
$resolve=`nslookup $_`;
....additional code using $resolve
{
[download]