for (@allnames) { if (@somenames){ $count++; } }