[表示 : 全て 最新50 1-99 101- 2ch.scのread.cgiへ]
Update time : 07/23 08:21 / Filesize : 39 KB / Number-of Response : 118
[このスレッドの書き込みを削除する]
[＋板 最近立ったスレ＆熱いスレ一覧 : ＋板 最近立ったスレ／記者別一覧] [類似スレッド一覧]

↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

【V5計画】CAFEMILK SHOPPING CART V5

39 名前：nobodyさん mailto:sage [2009/07/27(月) 12:47:23 ID:???.net]
ルールの意味をわかりやすく説明するサンプルコード

my $userdata = {};
$userdata->{test} = 1; ← ① 格納した情報を
require 'test.pl'
Test::testsub
　({
　config => $config,
　userdata => $userdata,
　log_error => $log_error,
　log_alert => $log_alert,
　status => $status,
　});
print $userdata->{test}; ← 出力は 2 ④ サブルーチン内で書き換えた内容がちゃんと保持されている
exit;

sub test
　{
　my $argument = shift;
　my $config = $argument->{config};
　my $userdata = $argument->{userdata}; ← ② サブルーチン内のローカル変数に格納して
　my $log_error = $argument->{log_error};
　my $log_alert = $argument->{log_alert};
　my $status = $argument->{status};
　$userdata->{test} = 2; ← ③ 書き換えているが
　}





[ 続きを読む ] / [ 携帯版 ]
全部読む 次100 最新50 ▲ [ このスレをブックマーク！ 携帯に送る ] 2chのread.cgiへ
[＋板 最近立ったスレ＆熱いスレ一覧 : ＋板 最近立ったスレ／記者別一覧]（*・∀・）＜39KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef