if (grep {$time_url_hits->[$i]->{url}} @url_list){ #print "found \n"; } else { print "adding url " . $time_url_hits->[$i]->{'url'} . " to url array \n"; push (@url_list,$time_url_hits->[$i]->{'url'}); ... ... foreach (@url_list) {