perlでオブジェクト指向

何なんだあの変態的なSyntaxは。いやこれで何となくわかったけど。

オブジェクト指向Perlの仕組み

オブジェクト指向の基本要素 Perlによる実装
クラス パッケージ
オブジェクト(インスタンス データ構造
メソッド サブルーチン

ちょっとした便利スクリプトを勉強しながらperlでチマチマ書こうとしてたんだが、pythonで書いたらサラサラ進んで楽しかった。もうperlは習得できないのか俺。pythonはどのLinuxにも必ず入っているわけじゃない場合があるけど、perlはほぼ100%なんだよなぁ(逆にいうと、それ以上のメリットはあまり感じない)。

つーか、これも変態的。うええええ。

sub foo { my $self = shift; @_ ? $self->{foo} = shift : $self->{foo} }

あとはこれが参考になる→Perl におけるオブジェクト指向 : torus solutions!