Select Code to Download

use warnings;
use strict;
...
print "Intersection: @intersect\n";
print "A only: @AOnly\n";
print "B only: @BOnly\n";

Intersection: 1 8
A only: 2 4
B only: 3 6