Problems? Is your data what you think it is? | |
PerlMonks |
Re^3: compare 2 arrays for intersect diff and commmon valuesby tangent (Parson) |
on Mar 25, 2014 at 06:14 UTC ( [id://1079646]=note: print w/replies, xml ) | Need Help?? |
Where you have our $device=$current_list[$n][0] the device name is now in $device, so that is what you want to count. Right after that add the line $count{$device}++;. Then do the same for where you have our $tempdevicelinks=$temp_list[$n][0] - add the line $count{$tempdevicelinks}++;. You could just copy and paste my sections of code into the relevant parts of your own code, and delete from your own code this bit:
In Section
Seekers of Perl Wisdom
|
|