perl2exe forRO vol.4
■ このスレッドは過去ログ倉庫に格納されています
009391の再訂正 ◆rEHB0141ps
NGNG【サブルーチン名】 addParseFiles
【引数】 ファイル名,ハッシュのリファレンス,サブルーチンのリファレンス
【返り値】 なし
【機能説明】
返り値は無いが、@parseFilesの各リスト値が持つハッシュへ
上記3つの引数の内容を代入し、$parseFiles++とする。
【使用例】
addParseFiles("control/config.txt", \%config, \&parseDataFile3);
上記がKore.pl ver.0.82で呼び出されるとき$parseFilesはまだ未定義なので
$parseFiles[0]{'file'} = "control/config.txt"
$parseFiles[0]{'hash'} = \%config
$parseFiles[0]{'function'} = \&parseDataFile3
となり $parseFiles = 1 となる。
【備考】
結果としては全く同じだけれどもスクリプト初めに $parseFiles = 0 と明記した方が
スクリプトの理解がしやすいと思う。
\%config,\&parseDataFile3はそれぞれ%config,&parseDataFile3のリファレンス。
■ このスレッドは過去ログ倉庫に格納されています