バセット::マシン

Basset :: Machineは、マシンの状態に使用されるPerlモジュールです。
今すぐダウンロード

バセット::マシン ランキングとまとめ

広告

  • Rating:
  • ライセンス:
  • Perl Artistic License
  • 価格:
  • FREE
  • 出版社名:
  • Jim Thomason
  • 出版社のWebサイト:
  • http://search.cpan.org/jimt/Basset-1.04/lib/Basset/Machine.pm

バセット::マシン タグ


バセット::マシン 説明

Basset :: Machineは、マシンをステートするために使用されるPerlモジュールです。 Basset :: Machineは、State Machines.Synopsisanの例が最適に使用されるPerlモジュールです。 簡単なものを試してみましょう。 パッケージMy :: Machine; Basset :: Objectを使用してください。 Basset :: Object->>継承(__ package__、 'machine')。 サブスタート{Shift-> State( 'login'); サブログイン{My $ self = Shift; My $ HEAP = $ self->ヒープ; if($ heap - > {'loggedin'}){$ self->状態( 'success')を返す。 use {$ self->状態( 'プロンプト')を返す。 サブプロンプト{My $ Self = Shift; 印刷する「ユーザー名を入力してください( 'Bob'): "; Chomp(My $ name =); $ self - > {'heap'} - > {'loggedin'} = 1 $ name eq 'bob'; $ self-> state( 'login')を返します。 副成功{My $ self = shift; 「あなたはログに記録されている」を印刷します。 $ self-> terminateを返します。 1; 1; ---#!/ usr / bin / perl私の:: machineを使用してください。 My :: Machine-> Execute; 要件: ・Perl


バセット::マシン 関連ソフトウェア