罪と罰++二律背反
罪罰改造板2/541
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
] [
リンク元
]
開始行:
* 消えないキャラ作り_2 [#e1150d13]
- ページ: [[罪罰改造板2]]
- 投稿者: [[封天雷冥]]
- 優先順位: 重要
- 状態: 完了
- カテゴリー: 設置できません
- 投稿日: 2007-06-23 (土) 06:51:41
- バージョン:
** 内容 [#m3b73505]
罪罰改造板2/229
にあるようにore_regを変えてみたところ、文法はOKで、動くの...
# 期限切れ及び レベル2以内で3日間無アクセス(見物人排除)...
if((
($id ne '0000')
|| ($id ne '0000')
|| ($id ne '0000')
) && (($del_limit*3600*24<$time-$DAT{'la'})
|| (3*3600*24<$time-$DAT{'la'} && $DAT{'lv'}<=2))){
unlink("$usrdata$DAT{'id'}\.cgi");
}
}
どこかおかしいでしょうか?
返信よろしくお願いします。
--------
- unlinkの一文を削除してみては? -- [[Gun]] &new{2007-06-...
- unlinkは、ファイル削除のコマンドなんで、削除したら、期...
- $DAT{'id'} じゃないですか? -- [[six]] &new{2007-06-23...
- $DAT{' '} 部分が、4つありますが、どれを修正すればいい...
- 無理に一つの式にしないで、入れ子にすれば?>ついでに、...
- 入れ子と言うと・・・?どういう風にすればいいのですか?...
- 入れ子というのは所謂。。。
if(条件1){
if(条件2){
「条件1&2で動かす処理」
}
}
こぉゅぅ状態です-- [[三毛猫]] &new{2007-06-24 (日) 19:43:...
- それと$DAT{''}ですが、
foreach (0 .. $#tdat){
%DAT = '';
my @pairs = split(/,/,$tdat[$_]);
foreach (0 .. $#pairs){
my($key,$v) = split(/;/,$pairs[$_]);
$DAT{$key} = $v;
}
(略)
}
が何をしているのかと、%DATの意味を考えると分かるかと思い...
- リファレンスと、参考書とを見てもいまいちわかりません。...
- 何が分からないのかが分からないので、何とも言えないです...
- わからないこと・・・『foreachの後に[ ]がないこと。』『...
- "PREL foreach"でぐぐるとか。。。(とほほさんとこやミス...
- ミスティーネットsのところで、いろいろ調べたところ、my ...
# 参加者データ一括読み込み
sub usrdata_open{
foreach (0 .. $#usrfile) {
open(IN,"$usrdata$usrfile[$_]") || &error("Can't open $...
$line = <IN>; #<-$lineに usrdataを代入
close(IN); # ↓
push(@tdat,$line); #<-ここに、tdatがある。末尾に$line...
}
}
により、$tdat[$_]には、usrdataつまり、キャラデータが入っ...
-- [[封天雷冥]] &new{2007-06-26 (火) 21:37:33};
- 入れ子にするというものについて、今日、学校帰りにひらめ...
if($del_limit*3600*24<$time-$DAT{'la'})
|| (3*3600*24<$time-$DAT{'la'} && $DAT{'lv'}<=2))){
if($id ne ○○○○){
if($id ne ○○○○){
if($id ne ○○○○){
unlink("$usrdata$DAT{'id'}\.cgi");
}
}
}
}
-- [[封天雷冥]] &new{2007-06-27 (水) 18:21:16};
- 自己解決しました!スプリクトはっておきます。 -- [[封天...
if($DAT{'id'} ne ○○○○){
if($DAT{'id'} ne ○○○○){
if($DAT{'id'} ne ○○○○){
if($DAT{'id'} ne ○○○○){
if($del_limit*3600*24<$time-$DAT{'la'})
|| (3*3600*24<$time-$DAT{'la'} && $DAT{'lv'}<=2...
unlink("$usrdata$DAT{'id'}\.cgi");
}
}
}
}
}
これで動くと思います。{}の数とかに注意してください。
- 解決です。 -- [[封天雷冥]] &new{2007-07-20 (金) 13:24:2...
- XdFleJwkjtAr -- [[aacnubo]] &new{2008-12-12 (金) 07:45:...
#comment
終了行:
* 消えないキャラ作り_2 [#e1150d13]
- ページ: [[罪罰改造板2]]
- 投稿者: [[封天雷冥]]
- 優先順位: 重要
- 状態: 完了
- カテゴリー: 設置できません
- 投稿日: 2007-06-23 (土) 06:51:41
- バージョン:
** 内容 [#m3b73505]
罪罰改造板2/229
にあるようにore_regを変えてみたところ、文法はOKで、動くの...
# 期限切れ及び レベル2以内で3日間無アクセス(見物人排除)...
if((
($id ne '0000')
|| ($id ne '0000')
|| ($id ne '0000')
) && (($del_limit*3600*24<$time-$DAT{'la'})
|| (3*3600*24<$time-$DAT{'la'} && $DAT{'lv'}<=2))){
unlink("$usrdata$DAT{'id'}\.cgi");
}
}
どこかおかしいでしょうか?
返信よろしくお願いします。
--------
- unlinkの一文を削除してみては? -- [[Gun]] &new{2007-06-...
- unlinkは、ファイル削除のコマンドなんで、削除したら、期...
- $DAT{'id'} じゃないですか? -- [[six]] &new{2007-06-23...
- $DAT{' '} 部分が、4つありますが、どれを修正すればいい...
- 無理に一つの式にしないで、入れ子にすれば?>ついでに、...
- 入れ子と言うと・・・?どういう風にすればいいのですか?...
- 入れ子というのは所謂。。。
if(条件1){
if(条件2){
「条件1&2で動かす処理」
}
}
こぉゅぅ状態です-- [[三毛猫]] &new{2007-06-24 (日) 19:43:...
- それと$DAT{''}ですが、
foreach (0 .. $#tdat){
%DAT = '';
my @pairs = split(/,/,$tdat[$_]);
foreach (0 .. $#pairs){
my($key,$v) = split(/;/,$pairs[$_]);
$DAT{$key} = $v;
}
(略)
}
が何をしているのかと、%DATの意味を考えると分かるかと思い...
- リファレンスと、参考書とを見てもいまいちわかりません。...
- 何が分からないのかが分からないので、何とも言えないです...
- わからないこと・・・『foreachの後に[ ]がないこと。』『...
- "PREL foreach"でぐぐるとか。。。(とほほさんとこやミス...
- ミスティーネットsのところで、いろいろ調べたところ、my ...
# 参加者データ一括読み込み
sub usrdata_open{
foreach (0 .. $#usrfile) {
open(IN,"$usrdata$usrfile[$_]") || &error("Can't open $...
$line = <IN>; #<-$lineに usrdataを代入
close(IN); # ↓
push(@tdat,$line); #<-ここに、tdatがある。末尾に$line...
}
}
により、$tdat[$_]には、usrdataつまり、キャラデータが入っ...
-- [[封天雷冥]] &new{2007-06-26 (火) 21:37:33};
- 入れ子にするというものについて、今日、学校帰りにひらめ...
if($del_limit*3600*24<$time-$DAT{'la'})
|| (3*3600*24<$time-$DAT{'la'} && $DAT{'lv'}<=2))){
if($id ne ○○○○){
if($id ne ○○○○){
if($id ne ○○○○){
unlink("$usrdata$DAT{'id'}\.cgi");
}
}
}
}
-- [[封天雷冥]] &new{2007-06-27 (水) 18:21:16};
- 自己解決しました!スプリクトはっておきます。 -- [[封天...
if($DAT{'id'} ne ○○○○){
if($DAT{'id'} ne ○○○○){
if($DAT{'id'} ne ○○○○){
if($DAT{'id'} ne ○○○○){
if($del_limit*3600*24<$time-$DAT{'la'})
|| (3*3600*24<$time-$DAT{'la'} && $DAT{'lv'}<=2...
unlink("$usrdata$DAT{'id'}\.cgi");
}
}
}
}
}
これで動くと思います。{}の数とかに注意してください。
- 解決です。 -- [[封天雷冥]] &new{2007-07-20 (金) 13:24:2...
- XdFleJwkjtAr -- [[aacnubo]] &new{2008-12-12 (金) 07:45:...
#comment
ページ名: