Select Code to Download

Array 1 = {0, 1,2,3,4,5,6,7,8,9}
Array 2 = {1,2,3,4,6,8, 10, 12,14}
Array 3 = {1,2,3,5,7,9, 11,13,15}

     Array 1   Array 2   Array 3
0    yes        
...
13                    yes
14            yes        
15                    yes

#!/usr/bin/perl
use strict;
...
print "\nB Array = @array2\n";
print "\nIntersect Array = @isect\n";
print "\nDiff Array = @diff\n\n";