http://qs321.pair.com?node_id=387056

JAMBOID has asked for the wisdom of the Perl Monks concerning the following question:

Howdi to all. I was thinking something like the sql IN function would be convenient. I was about to write one but I don't know how to access the lvalue to a function. For example:
if ( $x in ( 1, 3, 7 ) ) { # do this }
How does one do this, or is there already some built in function or construct of perl that does this?
Thanks very much,
-jim