ハッシュ変数に存在しないキーを指定した場合の値は何？ - 高卒文系プログラマの日常 by zetta1985

Perl 今日、初めてPerlのコードを触りました。僕は保守チームなので、もちろん既存バグの修正です。 しかもタチの悪い事に本番環境では上手くいっているのに、開発環境で上手くいってない、という一番厄介もとい力の見せ所なパターンでした。 パッと見そんなにレベルの高そうなコードじゃなかったので、とりあえず30分ぐらい、誰にも邪魔されない喫煙所で、基本構文のリファレンスをコピッたのを熟読して、いざ原因調査へ。 見事にハマった・・・orz 一機能がbashスクリプト、PL/SQL、Perlと複数言語に分散されてて実行時の動作がイミフだったのもありますけど・・・ ハマった原因の一つがコレ。 @array = {'aaa', 'bbb', 'ccc'}; %tmp; for ( @array ) { $tmp{$_} = 1 } if ($tmp($param) == 0){ # 配列に存在しない場合