- 履歴一覧
- 差分 を表示
- 現在との差分 を表示
- ソース を表示
- Perl/クラスを作成する へ行く。
- 1 (2011-09-29 (木) 08:36:06)
関連†
- Perl
概要†
Perlでクラスを作成する
方法†
#!/usr/bin/perl
{
package Hoge;
# コンストラクタ
sub new {
my $class = shift;
my $this = {
foo = 10,
};
return bless $this, $class;
}
# メソッド
sub getFoo {
my $this = shift;
return $this->{foo};
}
}
{
package main;
$hoge = new Hoge;
print $hoge->getFoo() . "\n";
}
解説†
ポイントは
- パッケージ分割
- shift（引数）
- bless
えっと、急ぎメモなので正直良く分かってないです。