Wouldn't the code be more readable/maintainable/etc with List::Util::uniq():
my @newb = uniq grep $_ > 850, @b, @c, @d;
Results are the same per Test::More::is_deeply(). (In older Perls, see List::MoreUtils::uniq.)
Give a man a fish: <%-{-{-{-<
In reply to Re^3: iterating through array and saving matches to new array
by AnomalousMonk
in thread iterating through array and saving matches to new array
by jazzfan
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |