Help for this page

Select Code to Download


  1. or download this
    perl -Mstrict -MArray::Utils=:all -WE 'my @x=(1,1,2,3,4,3); my @y=(0,3
    +,4,5,6,3,7,8); say for unique intersect @x, @y'
    
  2. or download this
    3
    4