If you think a function would be useful, why don't you just write it? (This code is UNTESTED.)

sub in {
    my $val = shift;
    $val == $_ and
        return 1 for
        $_;
    return;
}
in $question, ($a, $b, $c);
[download]