@a = (1,2,3,4,5);
@b = (10,11,12,13,14,15);

@odd = grep {$_ % 2} (@a, @b); # @odd = (1,3,5,11,13,15)