サブルーチンやif分以外での中括弧

質問

perlについて学習中で、現在フリーのスクリプトを見て勉強しております。

中括弧の使い方を教えて欲しいです。

sub test { print"OK"; }
if ($test>1) { print"OK"; }else{ print"NG";}

上記のようにサブルーチンやif文での使い方は分かるのですが、フリーのスクリプトの中に単に中括弧を使用している部分がありました。

例）

{ ←この括弧

　　　my(@new);
　　　for(0..3){if($tmp[$_]=~/jpg/){push(@new,$tmp[$_]);}}

}

矢印の部分の部分の括弧ですが、これはどのような意味があるのでしょうか？

よろしくお願いします。

回答No.2

poppo64 · ベストアンサー

レキシカルスコープと呼ばれるものを作るためです。
Perl では { } で囲まれた範囲（ブロック）にレキシカルスコープと呼ばれるものができます。
レキシカルスコープ内で my を付けて宣言さた変数（@new）はそのブロック終了後（対応する } より後ろ）は使えなくなり、間違えて同名の変数（@new）を再使用してしまう間違いを犯しにくくなります。

空のブロックでなくても、sub{}、if{}、foreach(){} など、さまざまなブロックでレキシカルスコープは作成されます。

「Perl スコープ」で検索されるといろいろ発見があると思います。

お礼

回答ありがとうございます。

とても詳しく説明いただき、感謝いたします。
今まで{}はいつもsubやifがあったので、それがない場合の意味が不明でしたが、これでようやく理解出来ました。

ありがとうございました。

回答No.1

Tacosan

本当にこう書いてあるだけだと無意味だけど, 「スコープ」について調べるといいかも.

お礼

回答ありがとうございます。
スコープについて調べてみたら、いろいろ参考になるサイトが見つかりました。
ありがとうございました。