DBIX ::クラス:: DynamicSubClass.

動的サブクシングを使用する便利な方法。
今すぐダウンロード

DBIX ::クラス:: DynamicSubClass. ランキングとまとめ

広告

  • Rating:
  • ライセンス:
  • Perl Artistic License
  • 価格:
  • FREE
  • 出版社名:
  • Pronin Oleg
  • 出版社のWebサイト:
  • http://search.cpan.org/syber/

DBIX ::クラス:: DynamicSubClass. タグ


DBIX ::クラス:: DynamicSubClass. 説明

動的サブクラスを使用するための便利な方法。 DBIX :: Class :: DynamicSubClassは、Dynamic Subclassing.Synopsis Package My :: Schema :: Gameを使用する便利な方法を提供するPerlモジュールです。 __package __-> load_components(qw / dynamicsubclass core /); __package __-> add_column(QW / ID名データ型/); __package __-> typecast_map(Type => {1 => 'My :: Schema :: Game :: Clofine'、2 => 'My :: Schema :: Game :: Shareware'、3 => 'My :: Schema: :ゲーム:: PDA '、}); $ game = $ schema-> resultSet( 'game') - > new({...、type => 1}); #ref $ game = 'My ::スキーマ::ゲーム::オンライン' @games = $ game-> search({type => 2}); #@gamesはすべてクラスMy :: Schema :: Game :: Shareware $ Game-> Type(3); #ゲームは私の::スキーマ::ゲーム:: PDA $ Game = $スキーマ - > ResultSet( 'ゲーム') - > new({}); #または$ game->タイプ(UNDEF); #ゲームはMy :: Schema :: Game #ddix :: class :: frozencolumns Package My :: Schema :: Gameを入力しました。 __package __-> load_components(qw / ... frozencolumns ... /);パッケージMy :: Schema :: Game :: Online;ベース 'My :: Schema :: Game'を使用してください。 __package __-> add_frozen_columns(data => qw / flash server_host server_port /);パッケージMy :: Schema :: Game :: Shareware。ベース 'My :: Schema :: Game'を使用してください。 __package __-> add_frozen_columns(data => qw / price download_url /); ... $ game-> type(1); #gameは、追加の列 'flash'、 'server_host'などを持っているでしょう$ game-> server_host( '...'); #(「データ」)$ game-> type(2)。 $ game-> server_host; #Error $ Game-> Price( '$ 3.00'); #ok $ Game = $ RS-> New({type => 1、flash => 'game.swf'、})。 #kok #more柔軟な方法パッケージMy :: Schema ::ゲーム; __package __-> typecast_column( 'type'); SUB CLASSIFY {#オブジェクトが「Type」My $ Self = Shiftを取得または損失するたびにコールされます。 #$ self、$ classを祝福するクラスが欲しいのですか。 } 要件: ・Perl


DBIX ::クラス:: DynamicSubClass. 関連ソフトウェア