perl-アロー演算子について｜リファレンス・オブジェクト・メソッド呼び出しの基本と応用

2018年5月28日2025年5月9日

今日は仕事で詰まったPerlのアロー演算子（->）について、復習と実務で気づいたポイントをまとめます。Perlで開発されたコードを逆設計書に起こす中で、Javaとの違いに戸惑った部分も含め、基本から応用まで整理します。

アロー演算子（`->`）とは？

Perlにおけるアロー演算子（->）は、主に「リファレンス（参照）」や「オブジェクト」の要素・メソッドにアクセスする際に使います。
Javaでいう「ドット演算子（.）」やC言語の「ポインタ->メンバ」に近い役割です^[2][5][6]。

例）xxx::ddd::ffff->new は、パッケージ（クラス）名::サブルーチン名->メソッド呼び出しの形です。

基本的な使い方

ハッシュリファレンスの要素アクセス
my %data = (key1 => 'value1', key2 => 'value2'); my $data_ref = \%data; print $data_ref->{'key1'}; # value1を出力
配列リファレンスの要素アクセス
my @array = (1, 2, 3); my $array_ref = \@array; print $array_ref->[1]; # 2を出力
オブジェクトのメソッド呼び出し
my $obj = MyClass->new(); $obj->do_something();

このように、アロー演算子は「リファレンス経由でデータ構造やメソッドにアクセス」するために不可欠です^[2][4][6][7]。

Javaとの違い・イメージのつかみ方

Javaのpackage co.jp.xxxxxやClassName.method()のような「ドット（.）」の感覚で、Perlでは「::」や「->」を使います。ただし、Perlはリファレンスやデータ構造の柔軟性が高く、参照経由でのアクセスやメソッド呼び出しにアロー演算子が必須です。

Perlのxxxx->newは「xxxxというパッケージ（クラス）のnewメソッドを呼び出し、インスタンスを生成」するイメージです^[2][5]。

応用例・よくあるパターン

ネストされたデータ構造へのアクセス
my %person = (name => 'Alice', address => { street => '123 Perl St.' }); print $person{address}->{street}; # 123 Perl St.を出力
関数リファレンスの呼び出し
sub say_hello { my $name = shift; print "Hello, $name!\n"; } my $func_ref = \&say_hello; $func_ref->('Alice'); # Hello, Alice!を出力
複雑なデータ構造の操作や可読性向上
my $data_ref = { array => [1,2,3], hash => { key => 'value' } }; print $data_ref->{array}->[1]; # 2を出力 print $data_ref->{hash}->{key}; # valueを出力