po Perl拡張
今すぐダウンロード

po ランキングとまとめ

po タグ

タイピング カプセル化 継承 より強いタイピング より強いカプセル化 より強力な継承

po 説明

強い型付け、カプセル化と継承を提供Perl拡張 POOFは試みはPerlのをより正式なオブジェクト指向実装の枠組みを与えることをPerlモジュールです。アクセスの3つのレベルを持つクラスのプロパティとメソッドの区別を提供する（パブリック、保護およびプライベート）。また、子クラスはなく、唯一の独自のコンテキストからメソッドをオーバーライドすることができ、その場合には、「仮想」とマークされているプロパティやメソッドに子クラスでオーバーライドする方法を制限します。これまで親が懸念されるとオーバーライドされたメソッドやプロパティは、まだそのperspective.Take上記の例から予想ように動作：それは「仮想」とマークされるのMyClassの任意の子どもたちは「OpinionAboutPerl6を」メソッドをオーバーライドすることができます。子サブで＃ OpinionAboutPerl6：メソッドpublic {私の（$ OBJ）= @_; 「おい、それは完全に管状のだ!!」を返します。 } publicメソッド「RealPublicOpinionAboutPerl6」しかし、それは親の視点から方法が変更されたことがないので、それは、MyClassの中で定義されていたとして、それが今度は「OpinionAboutPerl6」メソッドを呼び出しますと呼ばれています。私は、これは重要な行動であり、それはOOの原則は、Java、C＃やC ++のような他の一般的な言語で実装されているかと一緒に行くと信じていSYNOPSISパッケージのMyClass。ベースQW（POOF）を使用します。 ＃クラスのプロパティのサブ名前：プロパティpublic {{ '型' => '文字列'、 'デフォルト' => ''、 '正規表現' => QR / ^ {0128} $ /、}。}サブ年齢：プロパティpublic { { 'タイプ' => '整数'、 'デフォルト' => 0、 '分' => 0、 '最大' => 120、}}サブmarritalStatus：不動産プライベート{{ 'タイプ' => '文字列'、 'デフォルト」=> '一'、 '正規表現' => QR / ^（シングル|結婚？）$ / '' =>サブ{私の$ valを=シフトのIFilter。 $ valのLC返します。 }}}サブ配偶者：不動産プライベート{{ '型' => '文字列'、 'デフォルト' => '一'、 '正規表現' => QR / ^ {0,64} $ / 'のIFilter' =>。サブ{私の$ valを=シフト; $ valのLC返します。 }}}サブopinionAboutPerl6：「私は、私は夜に睡眠をそれほど心配ないのです」プロパティ保護された{{「型」=>「文字列」、「デフォルト」=> }}＃クラスのメソッドサブMarritalStatus：メソッドpublic {私の（$ OBJ、$リクエスタ）= @_。 （$依頼者EQ「極悪探して見知らぬ人」）{リターン「あなたのビジネスの非」であれば、 }他{$ OBJ戻る - > { 'marritalStatus'}}}サブノンアダルト：メソッドpublic {私の（$ OBJ、$ new_spouse）= @_を。 OBJ $ - > { '配偶者'} = $ new_spouse。もし（$ obj-> pErrors）{私の$エラー= $ obj-> pGetErrors。もし（$エラーが存在する - > { '配偶者'}）{ダイ「の問題、marrigeは!! $エラーオフになっている - > { '配偶者'} ";リターン0;}}他{$ OBJ - > { 'marritalStatus'} = '結婚';戻り値1;}}サブOpinionAboutPerl6：メソッドpublic仮想{私の（$ OBJ）= @_;リターン" ああ、素晴らしいです、本当に楽しみにして。それはほとんどここです:) ";}サブRealPublicOpinionAboutPerl6：メソッドpublic {私の（$ OBJ）= @_;リターン$ obj-> OpinionAboutPerl6;}要件： ・Perl

po 関連ソフトウェア