Perlの言語仕様にはやはり構造体は含まれていないようだ。しかし、追加モジュールというのがいろいろとあり、そこで実現されている。構造体を定義したければ、Class::Struct というモジュールを取り込む必要があるらしい。次のページはCに馴染みがある者に、てっとり早くPerlの要点を教えてくれて便利。

C言語を知る人へのPerl の基礎知識

C言語の

struct quadratic_form {
  int  left;
  int  center;
  int  right;
};
quadratic_form  some_qf;
some_qf.center = -3;

に対応させるには、次のように書けば良いのかな?

use Class::Struct

struct quadratic_form => {
    left   => '$',
    center => '$',
    right  => '$'
};
 
my $some_qf = new quadratic_form();
$some_qf->center(-3);

投稿者 sukarabe

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です