新しくperlで標準で欲しい関数は？

結局自分で作ればいいんだが、
標準で「これがあれば便利なのに・・・」
と思う関数は、どんなもの？
便宜的に名前をつけて、仕様を説明してみてくれ。

>>42
41じゃないけど。
if (
    $a == 1 /* 〜判定 */
    or $a == 2 /* 〜判定 */
)
みたいのがほしい。

書いてみたら意味不明だった…これなら今のPerlでできるじゃん。。
↑を一行にまとめてあるような場合の話ね。