@$_ = grep {not $_->{type} eq "warning"} @$_ for $UNNAMED_TOP_THINGY{list}{find};