Question

perl 判断数组里面是否含有某个元素

Answer 1

用 grep

$target = "def";
print "Found $target" if ( grep ($target , @x) ) ; #Found def

Answer 2

useArray::Compare;my@arr1=0..10;my@arr2=0..10;my$comp1=Array::Compare->;new;if($comp1->;compare(\@arr1,\@arr2)){print"Arraysarethesame\n";}else{print"Arraysaredifferent\n";}