再現対応 RELEASEATION - リリース時にアクションを呼び出します。
今すぐダウンロード

再現対応 ランキングとまとめ

再現対応 タグ

Perlモジュール 電話 リリース コールアクション リリースアクション ReleaseAction

再現対応 説明

ReleaseAction - リリース時にアクションを呼び出します。 ReleaseAction - Release後のコールアクション。 {＃ooスタイルMy $ Handle = ReleasAction-> New（sub {印刷 "Scopen"}）; 「Scopen」を印刷します。 {＃機能スタイルMy $ HOLDER = ON_RELEASE {印刷 "Scopen"}; 「Scopen」を印刷します。 {My $ ROLLBACK = ON_RELEASE {ROLLBACK_TRANS（）}; if（do_stuff（））{$ rollback-> cancel（）;これは彼らが破壊されたときに何かをする不透明なハンドルを作成する簡単な方法を提供します。新しいハンドルを作成する方法は2つあります。 1つ以上の引数を取ってください。最初の引数は、最初の引数が解放され、ハンドルが解放されたときに実行するアクションが実行され、（オプション）は、ハンドルがGet.newであるという引数です。 My $ Handle = ReleasAction-> New（sub {print shift}、「さようならCruel Worldn」）;インポートできるオプションの関数on_release。そのようなものを好む人のために、私は統語的砂糖のためにプロトタイプ@を提供しました。 My $ HOLDOR = ON_RELEASE {印刷 "Goodbye Cruel Worldn"}}概要で提案されているように、これはトランザクションの力学を設定したい場合に役立ちます。リリースアクションを作成してください。それからあなたがあなたの変更をコミットするとき、cleanup.exampleをキャンセルします.reareaseAction 'on_release'を使用します。 ＃これはモジュールセレクトサブと同じものです。 SUB TMP_SELECT {on_release {select shift} Shiftsを選択します。 「この印刷はstdoutnに行きます」と印刷します。 {My $ HOLD_SELECT = TMP_SELECT（* STDERR）;印刷 "この印刷物はSTDERRNに行きます"; 「再開して印刷する印刷」;より長い例を使用してください。 CWDを使用してください。 ReleaseActionを使用してください。サブCD_TO {CHDIR（$ _ ）または告白（ "Chdir to $ _ ：$！"）;サブTMP_CD {My $ CWD = CWD（）; CD_TO（シフト）。 RELEASEATACT->新規（CD_TO、$ CWD）; sub reshast_interesting {My $ IN_DIR = TMP_CD（ "some_dir"）; ＃新しいdir＃私は自動的に古いdir＃に戻り、サブルーチンを終了し、$ in_dirが範囲外になります。 } 要件： ・Perl

再現対応 関連ソフトウェア