そのうちPerlに入るかもしれないcase文Syntax::Keyword::Matchの紹介 - Acme::AnaTofuZ->new;

こんにちは。id:anatofuzです。 これはPerl Advent Calendar 2024の15日目の記事です。 昨日はid:mackee_wさんによるaquaでperlを入れて使えるようになりました でした。relocatable-perl自分は低スペックのPCでとりあえずPerl動かしたいときによく使っています。 さて、PerlはC言語からの影響が強い言語ですが、C言語にあってPerlにない、というよりあったが使われてなかった機能にcase文があります。 かつてはPerlのコアにgiven-whenと呼ばれるcase文の機能がPerl5.10.1から導入されていました。 use v5.10.1; given ($var) { when (/^abc/) { $abc = 1 } when (/^def/) { $def = 1 } when (/^xyz/) { $xyz =

[zu2]

便利そうだけど気持ち悪い

[kkobayashi]

ifで済むからなのかcase文って採用されないよね。あると嬉しい場面結構あると思うんだけど

[karupanerura]

よい。過去のスマートマッチとは違って演算子を指定するから評価されるコンテキストも明確で安心感あるよね