my $matches = 0;
foreach my $item (@items) {
  $matches++ if grep( $item eq $_, @list );
}
print "All match!" if $matches == @items;