sub get_list {
    ...
    push @list, $item if ($item->is(@keywords));
    ...
    return @list;
}