sub is {
    bless \shift, '_hidden';
}

sub _hidden::in {
    my $s=${shift,};
    $s eq $_ and return 1 for @_;
    0;
}

##</code><code>##

do_something if is($item)->in(@list);