■ロック処理・解除 のサブルーチン　 【動作テストデータ】




◆この 【動作テスト】のデータを出力するために使った サブルーチン内容は、 このページの最後に掲載してあります。
　　（データ出力の体裁の整え方は ズサンですが。）

　あなたも この出力用のサブルーチンを使ってテストすれば、 同じような出力が得られるハズです。


◆【動作テスト用の analysis.cgi】 を別に仕立て、
　 途中の数ヵ所で 出力サブルーチンを呼ぶ形にして、 テストした結果が、下記の 【動作テストデータ】 です。
　 あとで　改行・字下げを 加えて見やすくしました。


◇【動作テスト用の analysis.cgi】の、 どこで DataViewサブルーチンを呼ぶかで　出力内容が変わってきます。


　【動作テスト　 その１】は　わざと変な順番で ロック開始・解除させたテストです。

　【動作テスト　 その２】は　ごく普通のスタイルでテストしました。
 




★ 【ご注意】とお願い。

  flockでは 何回も動作テストしました。symlinkでは 数回しかテストしていませんが、動作は正常でした。
  また、flock と symlink を一時的に使い分ける動作テストは正常でした。
  mkdirでは 動作テストしていません。
  mkdirとsymlinkは 多重ロック処理の流れが同じですから 大丈夫とは思いますが、mkdirでロック処理する人は  本番の前に動作テストを行って下さい。
  （mkdirとsymlinkの コードの流れは、ディレクトリを作成するか シンボリックリンクを作成するか・・の違いだけ。）



【動作テスト　 その１】



★★以下は、【ロック開始】後のデータ★

★ 通算ロック回数 は、【14】です。 


@numberList0_of_array 、、    第 1番目の値・・ 1回目のロック処理です。 
	$Locked_Key[$nn] 、、第 1番目の値は、1です。 
	$Locked[$nn] 、、    第 1番目の値は、yesです。 
	$LockHandle[$nn] 、、第 1番目の値は、GLOB(0x81c98ec)です。 
	$myNamingFileHandle[$nn] 、、第 1番目の値は、LCK1 です。 

@numberList0_of_array 、、    第 2番目の値・・ 2回目のロック処理です。 
	$Locked_Key[$nn] 、、第 2番目の値は、1です。 
	$Locked[$nn] 、、    第 2番目の値は、yesです。 
	$LockHandle[$nn] 、、第 2番目の値は、GLOB(0x822d4a0)です。 
	$myNamingFileHandle[$nn] 、、第 2番目の値は、LCK2 です。 

@numberList0_of_array 、、    第 3番目の値・・ 3回目のロック処理です。 
	$Locked_Key[$nn] 、、第 3番目の値は、1です。 
	$Locked[$nn] 、、    第 3番目の値は、yesです。 
	$LockHandle[$nn] 、、第 3番目の値は、GLOB(0x822d500)です。 
	$myNamingFileHandle[$nn] 、、第 3番目の値は、LCK3 です。 

@numberList0_of_array 、、    第 4番目の値・・ 4回目のロック処理です。 
	$Locked_Key[$nn] 、、第 4番目の値は、1です。 
	$Locked[$nn] 、、    第 4番目の値は、yesです。 
	$LockHandle[$nn] 、、第 4番目の値は、GLOB(0x822d560)です。 
	$myNamingFileHandle[$nn] 、、第 4番目の値は、LCK4 です。 

@numberList0_of_array 、、    第 5番目の値・・ 6回目のロック処理です。 
	$Locked_Key[$nn] 、、第 6番目の値は、1です。 
	$Locked[$nn] 、、    第 6番目の値は、yesです。 
	$LockHandle[$nn] 、、第 6番目の値は、GLOB(0x822d620)です。 
	$myNamingFileHandle[$nn] 、、第 6番目の値は、LCK6 です。 

@numberList0_of_array 、、    第 6番目の値・・ 7回目のロック処理です。 
	$Locked_Key[$nn] 、、第 7番目の値は、1です。 
	$Locked[$nn] 、、    第 7番目の値は、yesです。 
	$LockHandle[$nn] 、、第 7番目の値は、GLOB(0x822d680)です。 
	$myNamingFileHandle[$nn] 、、第 7番目の値は、LCK7 です。 

@numberList0_of_array 、、    第 7番目の値・・12回目のロック処理です。 
	$Locked_Key[$nn] 、、第12番目の値は、1です。 
	$Locked[$nn] 、、    第12番目の値は、yesです。 
	$LockHandle[$nn] 、、第12番目の値は、GLOB(0x811347c)です。 
	$myNamingFileHandle[$nn] 、、第12番目の値は、LCK12です。 

@numberList0_of_array 、、    第 8番目の値・・ 9回目のロック処理です。 
	$Locked_Key[$nn] 、、第 9番目の値は、1です。 
	$Locked[$nn] 、、    第 9番目の値は、yesです。 
	$LockHandle[$nn] 、、第 9番目の値は、GLOB(0x822d740)です。 
	$myNamingFileHandle[$nn] 、、第 9番目の値は、LCK9 です。 

@numberList0_of_array 、、    第 9番目の値・・11回目のロック処理です。 
	$Locked_Key[$nn] 、、第11番目の値は、1です。 
	$Locked[$nn] 、、    第11番目の値は、yesです。 
	$LockHandle[$nn] 、、第11番目の値は、GLOB(0x811341c)です。 
	$myNamingFileHandle[$nn] 、、第11番目の値は、LCK11です。 

@numberList0_of_array 、、    第10番目の値・・13回目のロック処理です。 
	$Locked_Key[$nn] 、、第13番目の値は、1です。 
	$Locked[$nn] 、、    第13番目の値は、yesです。 
	$LockHandle[$nn] 、、第13番目の値は、GLOB(0x81134dc)です。 
	$myNamingFileHandle[$nn] 、、第13番目の値は、LCK13です。 

@numberList0_of_array 、、    第11番目の値・・10回目のロック処理です。 
	$Locked_Key[$nn] 、、第10番目の値は、1です。 
	$Locked[$nn] 、、    第10番目の値は、yesです。 
	$LockHandle[$nn] 、、第10番目の値は、GLOB(0x822d7a0)です。 
	$myNamingFileHandle[$nn] 、、第10番目の値は、LCK10です。 

@numberList0_of_array 、、    第12番目の値・・ 5回目のロック処理です。 
	$Locked_Key[$nn] 、、第 5番目の値は、1です。 
	$Locked[$nn] 、、    第 5番目の値は、yesです。 
	$LockHandle[$nn] 、、第 5番目の値は、GLOB(0x822d5c0)です。 
	$myNamingFileHandle[$nn] 、、第 5番目の値は、LCK5 です。 

@numberList0_of_array 、、    第13番目の値・・14回目のロック処理です。 
	$Locked_Key[$nn] 、、第14番目の値は、1です。 
	$Locked[$nn] 、、    第14番目の値は、yesです。 
	$LockHandle[$nn] 、、第14番目の値は、GLOB(0x811353c)です。 
	$myNamingFileHandle[$nn] 、、第14番目の値は、LCK14です。 

以上は、ロック処理の【ロック処理履歴・情報-配列】のデータです。

------------------------------

８回目のロックは、【$Bigger_LK （@numberList0_of_arrayの 第７要素／添え字）】。

解除せずに、１２回目に $Bigger_LK で　わざと またロックをかけた。
	（【flock】では、自分がロックをかけた後 解除せずに再度ロックかけても ロック出来ている。なぜ？。）

１２回目のロック処理直後、戻り値として  $Bigger_LK には 12が代入されている。
  （この場合、同じ $Bigger_LK に12が代入されたので、 ８回目のロック情報は、numberList0_of_arrayの要素は 保有しない）


９回目のロックは $Sym_1i_LK 。・・そのまま解除を忘れたスタイル。（ $Sym_1i_LKは【@numberList0_of_arrayの 第８要素／添え字】）

---------------------------------------------------------------------------------------------------------------------


★★以下は、【ロック全解除】後のデータ★

★ 通算ロック回数 は、【14】です。 


@numberList0_of_array 、、    第 1番目の値・・ 1回目のロック処理です。 
	$Locked_Key[$nn] 、、第 1番目の値は、1です。 
	$Locked[$nn] 、、    第 1番目の値は、freeです。 
	$LockHandle[$nn] 、、第 1番目の値は、GLOB(0x81c98ec)です。 
	$myNamingFileHandle[$nn] 、、第 1番目の値は、LCK1 です。 

@numberList0_of_array 、、    第 2番目の値・・ 2回目のロック処理です。 
	$Locked_Key[$nn] 、、第 2番目の値は、1です。 
	$Locked[$nn] 、、    第 2番目の値は、freeです。 
	$LockHandle[$nn] 、、第 2番目の値は、GLOB(0x822d4a0)です。 
	$myNamingFileHandle[$nn] 、、第 2番目の値は、LCK2 です。 

@numberList0_of_array 、、    第 3番目の値・・ 3回目のロック処理です。 
	$Locked_Key[$nn] 、、第 3番目の値は、1です。 
	$Locked[$nn] 、、    第 3番目の値は、freeです。 
	$LockHandle[$nn] 、、第 3番目の値は、GLOB(0x822d500)です。 
	$myNamingFileHandle[$nn] 、、第 3番目の値は、LCK3 です。 

@numberList0_of_array 、、    第 4番目の値・・ 4回目のロック処理です。 
	$Locked_Key[$nn] 、、第 4番目の値は、1です。 
	$Locked[$nn] 、、    第 4番目の値は、freeです。 
	$LockHandle[$nn] 、、第 4番目の値は、GLOB(0x822d560)です。 
	$myNamingFileHandle[$nn] 、、第 4番目の値は、LCK4 です。 

@numberList0_of_array 、、    第 5番目の値・・ 6回目のロック処理です。 
	$Locked_Key[$nn] 、、第 6番目の値は、1です。 
	$Locked[$nn] 、、    第 6番目の値は、freeです。 
	$LockHandle[$nn] 、、第 6番目の値は、GLOB(0x822d620)です。 
	$myNamingFileHandle[$nn] 、、第 6番目の値は、LCK6 です。 

@numberList0_of_array 、、    第 6番目の値・・ 7回目のロック処理です。 
	$Locked_Key[$nn] 、、第 7番目の値は、1です。 
	$Locked[$nn] 、、    第 7番目の値は、freeです。 
	$LockHandle[$nn] 、、第 7番目の値は、GLOB(0x822d680)です。 
	$myNamingFileHandle[$nn] 、、第 7番目の値は、LCK7 です。 

@numberList0_of_array 、、    第 7番目の値・・12回目のロック処理です。 
	$Locked_Key[$nn] 、、第12番目の値は、1です。 
	$Locked[$nn] 、、    第12番目の値は、freeです。 
	$LockHandle[$nn] 、、第12番目の値は、GLOB(0x811347c)です。 
	$myNamingFileHandle[$nn] 、、第12番目の値は、LCK12です。 

@numberList0_of_array 、、    第 8番目の値・・ 9回目のロック処理です。 
	$Locked_Key[$nn] 、、第 9番目の値は、1です。 
	$Locked[$nn] 、、    第 9番目の値は、freeです。 
	$LockHandle[$nn] 、、第 9番目の値は、GLOB(0x822d740)です。 
	$myNamingFileHandle[$nn] 、、第 9番目の値は、LCK9 です。 

@numberList0_of_array 、、    第 9番目の値・・11回目のロック処理です。 
	$Locked_Key[$nn] 、、第11番目の値は、1です。 
	$Locked[$nn] 、、    第11番目の値は、freeです。 
	$LockHandle[$nn] 、、第11番目の値は、GLOB(0x811341c)です。 
	$myNamingFileHandle[$nn] 、、第11番目の値は、LCK11です。 

@numberList0_of_array 、、    第10番目の値・・13回目のロック処理です。 
	$Locked_Key[$nn] 、、第13番目の値は、1です。 
	$Locked[$nn] 、、    第13番目の値は、freeです。 
	$LockHandle[$nn] 、、第13番目の値は、GLOB(0x81134dc)です。 
	$myNamingFileHandle[$nn] 、、第13番目の値は、LCK13です。 

@numberList0_of_array 、、    第11番目の値・・10回目のロック処理です。 
	$Locked_Key[$nn] 、、第10番目の値は、1です。 
	$Locked[$nn] 、、    第10番目の値は、freeです。 
	$LockHandle[$nn] 、、第10番目の値は、GLOB(0x822d7a0)です。 
	$myNamingFileHandle[$nn] 、、第10番目の値は、LCK10です。 

@numberList0_of_array 、、    第12番目の値・・ 5回目のロック処理です。 
	$Locked_Key[$nn] 、、第 5番目の値は、1です。 
	$Locked[$nn] 、、    第 5番目の値は、freeです。 
	$LockHandle[$nn] 、、第 5番目の値は、GLOB(0x822d5c0)です。 
	$myNamingFileHandle[$nn] 、、第 5番目の値は、LCK5 です。 

@numberList0_of_array 、、    第13番目の値・・14回目のロック処理です。 
	$Locked_Key[$nn] 、、第14番目の値は、1です。 
	$Locked[$nn] 、、    第14番目の値は、freeです。 
	$LockHandle[$nn] 、、第14番目の値は、GLOB(0x811353c)です。 
	$myNamingFileHandle[$nn] 、、第14番目の値は、LCK14です。 

以上は、ロック処理の【ロック処理履歴・情報-配列】のデータです。




【動作テスト　 その２】



★★以下は、ロック中のデータ。（外ロック２つ＋内ロック２つ）★

★ 通算ロック回数 は、【4】です。 


@numberList0_of_array 、、    第 1番目の値・・1回目のロック処理です。 
	$Locked_Key[$nn] 、、第 1番目の値は、1です。 
	$Locked[$nn] 、、    第 1番目の値は、freeです。 
	$LockHandle[$nn] 、、第 1番目の値は、GLOB(0x8135b74)です。 

@numberList0_of_array 、、    第 2番目の値・・2回目のロック処理です。 
	$Locked_Key[$nn] 、、第 2番目の値は、1です。 
	$Locked[$nn] 、、    第 2番目の値は、freeです。 
	$LockHandle[$nn] 、、第 2番目の値は、GLOB(0x8135ae4)です。 

@numberList0_of_array 、、    第 3番目の値・・3回目のロック処理です。 
	$Locked_Key[$nn] 、、第 3番目の値は、1です。 
	$Locked[$nn] 、、    第 3番目の値は、yesです。 
	$LockHandle[$nn] 、、第 3番目の値は、GLOB(0x81358e0)です。 

@numberList0_of_array 、、    第 4番目の値・・4回目のロック処理です。 
	$Locked_Key[$nn] 、、第 4番目の値は、1です。 
	$Locked[$nn] 、、    第 4番目の値は、yesです。 
	$LockHandle[$nn] 、、第 4番目の値は、GLOB(0x81dd278)です。 

以上は、ロック処理の【ロック処理履歴・情報-配列】のデータです。



--------------------------------------------------------------------------------


★処理途中。【最終パス発行の年月日分】から２５分以内かも・・実験用は３分とか５分★。

Rec_accsess_min＝10402041000／nowDayTime_min＝10402041021

★ 通算ロック回数 は、【4】です。 


@numberList0_of_array 、、    第 1番目の値・・1回目のロック処理です。 
	$Locked_Key[$nn] 、、第 1番目の値は、1です。 
	$Locked[$nn] 、、    第 1番目の値は、freeです。 
	$LockHandle[$nn] 、、第 1番目の値は、GLOB(0x8135b74)です。 

@numberList0_of_array 、、    第 2番目の値・・2回目のロック処理です。 
	$Locked_Key[$nn] 、、第 2番目の値は、1です。 
	$Locked[$nn] 、、    第 2番目の値は、freeです。 
	$LockHandle[$nn] 、、第 2番目の値は、GLOB(0x8135ae4)です。 

@numberList0_of_array 、、    第 3番目の値・・3回目のロック処理です。 
	$Locked_Key[$nn] 、、第 3番目の値は、1です。 
	$Locked[$nn] 、、    第 3番目の値は、yesです。 
	$LockHandle[$nn] 、、第 3番目の値は、GLOB(0x81358e0)です。 

@numberList0_of_array 、、    第 4番目の値・・4回目のロック処理です。 
	$Locked_Key[$nn] 、、第 4番目の値は、1です。 
	$Locked[$nn] 、、    第 4番目の値は、yesです。 
	$LockHandle[$nn] 、、第 4番目の値は、GLOB(0x81dd278)です。 

以上は、ロック処理の【ロック処理履歴・情報-配列】のデータです。



--------------------------------------------------------------------------------


★★以下は、ロック中のデータ。【最終パス発行の年月日分】から２６分以上“あと”。（外ロック２つ＋内ロック２つ）★

★ 通算ロック回数 は、【6】です。 


@numberList0_of_array 、、    第 1番目の値・・1回目のロック処理です。 
	$Locked_Key[$nn] 、、第 1番目の値は、1です。 
	$Locked[$nn] 、、    第 1番目の値は、freeです。 
	$LockHandle[$nn] 、、第 1番目の値は、GLOB(0x8135b74)です。 

@numberList0_of_array 、、    第 2番目の値・・2回目のロック処理です。 
	$Locked_Key[$nn] 、、第 2番目の値は、1です。 
	$Locked[$nn] 、、    第 2番目の値は、freeです。 
	$LockHandle[$nn] 、、第 2番目の値は、GLOB(0x8135ae4)です。 

@numberList0_of_array 、、    第 3番目の値・・3回目のロック処理です。 
	$Locked_Key[$nn] 、、第 3番目の値は、1です。 
	$Locked[$nn] 、、    第 3番目の値は、yesです。 
	$LockHandle[$nn] 、、第 3番目の値は、GLOB(0x81358e0)です。 

@numberList0_of_array 、、    第 4番目の値・・4回目のロック処理です。 
	$Locked_Key[$nn] 、、第 4番目の値は、1です。 
	$Locked[$nn] 、、    第 4番目の値は、yesです。 
	$LockHandle[$nn] 、、第 4番目の値は、GLOB(0x81dd278)です。 

@numberList0_of_array 、、    第 5番目の値・・5回目のロック処理です。 
	$Locked_Key[$nn] 、、第 5番目の値は、1です。 
	$Locked[$nn] 、、    第 5番目の値は、yesです。 
	$LockHandle[$nn] 、、第 5番目の値は、GLOB(0x82416f8)です。 

@numberList0_of_array 、、    第 6番目の値・・6回目のロック処理です。 
	$Locked_Key[$nn] 、、第 6番目の値は、1です。 
	$Locked[$nn] 、、    第 6番目の値は、yesです。 
	$LockHandle[$nn] 、、第 6番目の値は、GLOB(0x8241740)です。 

以上は、ロック処理の【ロック処理履歴・情報-配列】のデータです。



--------------------------------------------------------------------------------


★★以下は、【ロック開始＋データ処理完了・・ロック２つ未解除】の、データ★

★ 通算ロック回数 は、【13】です。 


@numberList0_of_array 、、    第 1番目の値・・1回目のロック処理です。 
	$Locked_Key[$nn] 、、第 1番目の値は、1です。 
	$Locked[$nn] 、、    第 1番目の値は、freeです。 
	$LockHandle[$nn] 、、第 1番目の値は、GLOB(0x8135b74)です。 

@numberList0_of_array 、、    第 2番目の値・・2回目のロック処理です。 
	$Locked_Key[$nn] 、、第 2番目の値は、1です。 
	$Locked[$nn] 、、    第 2番目の値は、freeです。 
	$LockHandle[$nn] 、、第 2番目の値は、GLOB(0x8135ae4)です。 

@numberList0_of_array 、、    第 3番目の値・・3回目のロック処理です。 
	$Locked_Key[$nn] 、、第 3番目の値は、1です。 
	$Locked[$nn] 、、    第 3番目の値は、yesです。 
	$LockHandle[$nn] 、、第 3番目の値は、GLOB(0x81358e0)です。 

@numberList0_of_array 、、    第 4番目の値・・4回目のロック処理です。 
	$Locked_Key[$nn] 、、第 4番目の値は、1です。 
	$Locked[$nn] 、、    第 4番目の値は、yesです。 
	$LockHandle[$nn] 、、第 4番目の値は、GLOB(0x81dd278)です。 

@numberList0_of_array 、、    第 5番目の値・・5回目のロック処理です。 
	$Locked_Key[$nn] 、、第 5番目の値は、1です。 
	$Locked[$nn] 、、    第 5番目の値は、freeです。 
	$LockHandle[$nn] 、、第 5番目の値は、GLOB(0x82416f8)です。 

@numberList0_of_array 、、    第 6番目の値・・6回目のロック処理です。 
	$Locked_Key[$nn] 、、第 6番目の値は、1です。 
	$Locked[$nn] 、、    第 6番目の値は、freeです。 
	$LockHandle[$nn] 、、第 6番目の値は、GLOB(0x8241740)です。 

@numberList0_of_array 、、    第 7番目の値・・7回目のロック処理です。 
	$Locked_Key[$nn] 、、第 7番目の値は、1です。 
	$Locked[$nn] 、、    第 7番目の値は、freeです。 
	$LockHandle[$nn] 、、第 7番目の値は、GLOB(0x8172e20)です。 

@numberList0_of_array 、、    第 8番目の値・・8回目のロック処理です。 
	$Locked_Key[$nn] 、、第 8番目の値は、1です。 
	$Locked[$nn] 、、    第 8番目の値は、freeです。 
	$LockHandle[$nn] 、、第 8番目の値は、GLOB(0x8172e08)です。 

@numberList0_of_array 、、    第 9番目の値・・10回目のロック処理です。 
	$Locked_Key[$nn] 、、第10番目の値は、1です。 
	$Locked[$nn] 、、    第10番目の値は、freeです。 
	$LockHandle[$nn] 、、第10番目の値は、GLOB(0x8172ec8)です。 

@numberList0_of_array 、、    第10番目の値・・11回目のロック処理です。 
	$Locked_Key[$nn] 、、第11番目の値は、1です。 
	$Locked[$nn] 、、    第11番目の値は、freeです。 
	$LockHandle[$nn] 、、第11番目の値は、GLOB(0x8172e8c)です。 

@numberList0_of_array 、、    第11番目の値・・9回目のロック処理です。 
	$Locked_Key[$nn] 、、第 9番目の値は、1です。 
	$Locked[$nn] 、、    第 9番目の値は、freeです。 
	$LockHandle[$nn] 、、第 9番目の値は、GLOB(0x8172e44)です。 

@numberList0_of_array 、、    第12番目の値・・12回目のロック処理です。 
	$Locked_Key[$nn] 、、第12番目の値は、1です。 
	$Locked[$nn] 、、    第12番目の値は、freeです。 
	$LockHandle[$nn] 、、第12番目の値は、GLOB(0x8172f34)です。 

@numberList0_of_array 、、    第13番目の値・・13回目のロック処理です。 
	$Locked_Key[$nn] 、、第13番目の値は、1です。 
	$Locked[$nn] 、、    第13番目の値は、freeです。 
	$LockHandle[$nn] 、、第13番目の値は、GLOB(0x8172fac)です。 

以上は、ロック処理の【ロック処理履歴・情報-配列】のデータです。



--------------------------------------------------------------------------------


★★★【テスト完了】です★★★

★★以下は、【ALLUnLock】後のデータ★

★ 通算ロック回数 は、【13】です。 


@numberList0_of_array 、、    第 1番目の値・・1回目のロック処理です。 
	$Locked_Key[$nn] 、、第 1番目の値は、1です。 
	$Locked[$nn] 、、    第 1番目の値は、freeです。 
	$LockHandle[$nn] 、、第 1番目の値は、GLOB(0x8135b74)です。 

@numberList0_of_array 、、    第 2番目の値・・2回目のロック処理です。 
	$Locked_Key[$nn] 、、第 2番目の値は、1です。 
	$Locked[$nn] 、、    第 2番目の値は、freeです。 
	$LockHandle[$nn] 、、第 2番目の値は、GLOB(0x8135ae4)です。 

@numberList0_of_array 、、    第 3番目の値・・3回目のロック処理です。 
	$Locked_Key[$nn] 、、第 3番目の値は、1です。 
	$Locked[$nn] 、、    第 3番目の値は、freeです。 
	$LockHandle[$nn] 、、第 3番目の値は、GLOB(0x81358e0)です。 

@numberList0_of_array 、、    第 4番目の値・・4回目のロック処理です。 
	$Locked_Key[$nn] 、、第 4番目の値は、1です。 
	$Locked[$nn] 、、    第 4番目の値は、freeです。 
	$LockHandle[$nn] 、、第 4番目の値は、GLOB(0x81dd278)です。 

@numberList0_of_array 、、    第 5番目の値・・5回目のロック処理です。 
	$Locked_Key[$nn] 、、第 5番目の値は、1です。 
	$Locked[$nn] 、、    第 5番目の値は、freeです。 
	$LockHandle[$nn] 、、第 5番目の値は、GLOB(0x82416f8)です。 

@numberList0_of_array 、、    第 6番目の値・・6回目のロック処理です。 
	$Locked_Key[$nn] 、、第 6番目の値は、1です。 
	$Locked[$nn] 、、    第 6番目の値は、freeです。 
	$LockHandle[$nn] 、、第 6番目の値は、GLOB(0x8241740)です。 

@numberList0_of_array 、、    第 7番目の値・・7回目のロック処理です。 
	$Locked_Key[$nn] 、、第 7番目の値は、1です。 
	$Locked[$nn] 、、    第 7番目の値は、freeです。 
	$LockHandle[$nn] 、、第 7番目の値は、GLOB(0x8172e20)です。 

@numberList0_of_array 、、    第 8番目の値・・8回目のロック処理です。 
	$Locked_Key[$nn] 、、第 8番目の値は、1です。 
	$Locked[$nn] 、、    第 8番目の値は、freeです。 
	$LockHandle[$nn] 、、第 8番目の値は、GLOB(0x8172e08)です。 

@numberList0_of_array 、、    第 9番目の値・・10回目のロック処理です。 
	$Locked_Key[$nn] 、、第10番目の値は、1です。 
	$Locked[$nn] 、、    第10番目の値は、freeです。 
	$LockHandle[$nn] 、、第10番目の値は、GLOB(0x8172ec8)です。 

@numberList0_of_array 、、    第10番目の値・・11回目のロック処理です。 
	$Locked_Key[$nn] 、、第11番目の値は、1です。 
	$Locked[$nn] 、、    第11番目の値は、freeです。 
	$LockHandle[$nn] 、、第11番目の値は、GLOB(0x8172e8c)です。 

@numberList0_of_array 、、    第11番目の値・・9回目のロック処理です。 
	$Locked_Key[$nn] 、、第 9番目の値は、1です。 
	$Locked[$nn] 、、    第 9番目の値は、freeです。 
	$LockHandle[$nn] 、、第 9番目の値は、GLOB(0x8172e44)です。 

@numberList0_of_array 、、    第12番目の値・・12回目のロック処理です。 
	$Locked_Key[$nn] 、、第12番目の値は、1です。 
	$Locked[$nn] 、、    第12番目の値は、freeです。 
	$LockHandle[$nn] 、、第12番目の値は、GLOB(0x8172f34)です。 

@numberList0_of_array 、、    第13番目の値・・13回目のロック処理です。 
	$Locked_Key[$nn] 、、第13番目の値は、1です。 
	$Locked[$nn] 、、    第13番目の値は、freeです。 
	$LockHandle[$nn] 、、第13番目の値は、GLOB(0x8172fac)です。 

以上は、ロック処理の【ロック処理履歴・情報-配列】のデータです。




◆【動作テスト用の analysis.cgi】で 下記のサブルーチンを呼ぶ時のスタイル


何回か　途中で、

&DataView('★★以下は、【ロック開始＋データ処理完了・・ロック２つ未解除】の、データ★★');

というスタイルで呼び、


最後は　

&ALLUnLock;
&DataView('★★以下は、【ALLUnLock】後のデータ★★');
exit;

というスタイルで呼んで終了させた。



◆【動作テスト】のデータを出力するために使った サブルーチン




dataView_code.txt