if ( $x in ( 1, 3, 7 ) ) { # do this } [download]
In reply to writing perl function like sql IN by JAMBOID