在Perl中为两个数组组合以获得相同的值

Question

假设我有两个阵列

@array1 holds the below values

branches/test1/a.txt
branches/test2/b.txt
branches/test2/c.txt

and 

@array2 

branches/test1/a.txt
branches/test2/b.txt
branches/test2/c.txt

我需要比较这两个数组并做一些匹配的事情。

我发现Array :: Compare有太多的依赖关系要安装。有没有其他方法呢？

Thanks