パッケージとオブジェクト指向の基本

このレッスンでは、Perlのオブジェクト指向プログラミングの基本であるパッケージの使い方を学びます。「Perl パッケージオブジェクト指向」で調べている方向けです。

Perlのクラスはpackage クラス名; ... 1;という形で定義します。コンストラクタは慣習としてnewという名前のサブルーチンを自分で定義します。

サンプルコードでは、package Animal;を定義し、newでハッシュリファレンスをオブジェクトとして作成し、speakメソッドで鳴き声を返しています。

初心者がよくつまずくのが、他の言語のようにクラス構文が組み込まれておらず、パッケージとハッシュリファレンスを組み合わせて自力でオブジェクトの仕組みを作る必要があることです。この独特な書き方はPerl特有のオブジェクト指向の考え方です。

実際の開発現場では、比較的新しいPerlのコードではMooseやMooといったモジュールを使って、よりシンプルにクラスを定義することも増えています。

📖 お手本コード

package Animal;

sub new {
    my ($class, $name) = @_;
    my $self = { name => $name };
    return bless $self, $class;
}

sub speak {
    my $self = shift;
    return "$self->{name}が鳴いています。";
}

package main;

my $dog = Animal->new("ポチ");
print $dog->speak(), "\n";

✍️ あなたのコード

コードを書いたら「実行する」を押してください

🧪 このサイトではPerlを直接コンパイル・実行できないため、お手本コードと同じ内容を入力できたかをその場で判定します(採点はブラウザ内だけで行われ、どこにも送信されません)。

🎯

ここまでできればゴール達成!
鳴き声を返す動物オブジェクトのような、状態と振る舞いを持つデータが作れるようになります。