if ({map{$_=>1}($bar,$baz,$boo)}->{$foo})
{
        print "Yes!\n";
}