| バセット::マシン Basset :: Machineは、マシンの状態に使用されるPerlモジュールです。 |
今すぐダウンロード |
バセット::マシン ランキングとまとめ
- ライセンス:
- Perl Artistic License
- 出版社の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
バセット::マシン 関連ソフトウェア