【スクリプト改造依頼スレ】(丸投げ) part3

【スクリプト改造依� ..

644:nobodyさん
05/05/12 03:39:38
>>640
######## $d_spliを指定したらログをデリファでソート
if($d_spli == 5){$d_spli = qq{$d_spli};
@sorted = #名前を変える
map { $_->[0] } #最初のキーを持ってくる
sort { $a->[1] <=> $b->[1] } #数値で昇順ソート
map { [$_, (split /,/)[$d_spli]] } @demilog3; #$d_spliで切り離して$_でもつ

}
elsif($d_spli){$d_spli = qq{$d_spli};
@sorted = #名前を変える
map { $_->[0] } #最初のキーを持ってくる
sort { $b->[1] cmp $a->[1] } #文字列で降順ソート
map { [$_, (split /,/)[$d_spli]] } @demilog3; #$d_spliで切り離して$_でもつ

}
else{$d_spli = q{0};
@sorted = @demilog3;

}

次ページ

続きを表示

1を表示