自作CGIを評価するスレ (672ﾚｽ)
上下前次1-新
165(1): 71 03/04/12 22:31 ID:??? AAS
>>164
if($n= 3){
だな、このデータの場合
166(2): 03/04/12 22:53 ID:??? AAS
=なんですか？
167(1): 71 03/04/12 23:00 ID:??? AAS
>>166
==だね(汗
168(6): 03/04/12 23:21 ID:??? AAS
>>163
途中でダレたからかなり適当ですがいぢってみますた。
外部ﾘﾝｸ[txt]:boobar.hp.infoseek.co.jp
169(2): ◆YHmsETNOS2 03/04/13 04:43 ID:??? AAS
>>164-168
さんくすでつ！
> データ量増えていくと、cmpを使う場合処理が遅くなる。
初耳でつ ﾒﾓﾒﾓ 〆（・＿・。）
>>168
全面的に書き換えてくださり、ありがとうございまつ！
感謝でつ！
乙でつ！
さっそくテストしてみまつた！
おー、動いているー。。 あれ（？＿？）
省2
170(2): 71 03/04/13 04:47 ID:??? AAS
>>169
初耳じゃなくて、そういうソースを組んでたから
指摘したまでなんだけど・・・
ソースちゃんと理解出来てますか？？(o_ _)o
171(1): ◆YHmsETNOS2 03/04/13 04:54 ID:??? AAS
>>170
> ソースちゃんと理解出来てますか
自分の>>163のソースは理解してまつ。
>>168さまのは、現在格闘中でつ。
苦戦しておりまつ。
172: 71 03/04/13 04:57 ID:??? AAS
>>171では、
foreach(@keys){
if($_->[$n] !~ /^\d*$/){
$num_flug =1;
last;
}
}
ｌココの部分がどういう処理をしてたか説明してみそ
173(1): ◆YHmsETNOS2 03/04/13 05:07 ID:??? AAS
foreach(@keys){ # @keysをforeachして
if($_->[$n] !~ /^\d*$/){ # $_の$n番目の値が数字ではなかったら、
$num_flug =1; # $num_flugに1を入れまつ
last; # foreachのループ抜けまつ
} # ifを閉じまつ
} # foreachを閉じまつ
省1
174: ◆YHmsETNOS2 03/04/13 05:15 ID:??? AAS
sortの cmp と <=> のどちらでやるかのフラグを立てているところっていったほうが良かったんでつか？
175: ◆YHmsETNOS2 03/04/13 05:30 ID:??? AAS
>>168
修正できましたぁ〜！
$lastpage++ unless @Record % $Pageview;
を
$lastpage++ if @Record % $Pageview;
176(1): 03/04/13 05:31 ID:??? AAS
俺敵には
>>169
＞> データ量増えていくと、cmpを使う場合処理が遅くなる。
＞初耳でつ ﾒﾓﾒﾓ 〆（・＿・。）
から、どうして
>>170
＞初耳じゃなくて、そういうソースを組んでたから
＞指摘したまでなんだけど・・・
のようなレスが付くのか良く分かりません。
cmp使うのが初耳だったんでしょ？なんで「初耳じゃなくて」なんだろう？
177: 03/04/13 05:32 ID:??? AAS
×cmp使うのが初耳だったんでしょ？
○cmp使うと遅くなるっていうのが初耳だったんでしょ？
178(2): 71 03/04/13 05:32 ID:??? AAS
>>173
つまり、該当データが文字列ばっかりだとループ終わるまで抜けない。
-> 次の処理にいくまで時間がかかるという事で cmp処理のときに時間がかかるという理屈。
179: 71 03/04/13 05:35 ID:??? AAS
>>176そのソース私の奴改造してるから聞いてみたのだけど変ですか？
ところで、ソース組んだんだけどどっかアップしやすい所無いかのぉ
180: ◆YHmsETNOS2 03/04/13 05:53 ID:??? AAS
AA省
181(1): 71 03/04/13 06:00 ID:??? AAS
んで、件のソースの改造
外部ﾘﾝｸ[txt]:kiteline.net
この規模だと分ける意味がないとおもうんだけど・・・
182: 03/04/13 06:09 ID:??? AAS
>>178
ああ、そういう意味か。てっきりcmpと<=>の違いを言ってるのかと思った。ｽﾏｿ
183(2): ◆YHmsETNOS2 03/04/13 06:35 ID:??? AAS
>>181
改造さんくすでつ！
でも、穴が多いッスね。
次のページを押し続けれないし、
前のページが表示されないし、
順番が0-9の固定だし。。。
勉強のため漏れが修正したいと重い松が。。。
>>181さんの目から見て、>>168さんのソートは処理が重そうでつか？
>>168さんのソースは今まで漏れが出会ったことのない書き方だからちょっと苦戦しておりまつ。
おっと、>>168さんのソース、逆順ソートが出来ない。。。
省2
184(1): ◆YHmsETNOS2 03/04/13 06:51 ID:??? AAS
>>168
逆順ソートが出来ない件、修正しましたが。。。
$TableHeader .= qq|\t<th><a href="| . make_url(n => $_, action => 1) . qq|">$field{$_}</a></th>\n|
for sort { $a <=> $b } keys %field;
を
if ($Param{'rev'}){
$TableHeader .= qq|\t<th><a href="| . make_url(n => $_, action => 1,rev => 0) . qq|">$field{$_}</a></th>\n|
for sort { $a <=> $b } keys %field;
}else{
$TableHeader .= qq|\t<th><a href="| . make_url(n => $_, action => 1,rev => 1) . qq|">$field{$_}</a></th>\n|
省3
上下前次1-新書関写板覧索設栞歴
あと 488 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.009s