#!/usr/bin/perl -l use strict; use warnings; my @big = qw(this is the main array from which to delete elements); my @small = qw(delete elements); my @new = grep { my $x = $_; not grep { $x =~/\Q$_/i } @small } @big; print "@new";
In reply to Re: Check if one array is a subset of another
by Khen1950fx
in thread Check if one array is a subset of another
by cstrong
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |