Select Code to Download

use Set::Scalar;

...
my $smallset = Set::Scalar->new(@smallarray);

my $difference = $bigset - $smallset;

my $smallarray_ref = \@smallarray;
my @difference = grep { !($_ ~~ $smallarray_ref) } @bigarray;