use Set::Scalar;

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

my $difference = $bigset - $smallset;

##</code><code>##

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