[過去ログ]
Perlについての質問箱 64箱目 (1002レス)
Perlについての質問箱 64箱目 http://mevius.5ch.net/test/read.cgi/tech/1548981877/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
883: 532 [sage] 2020/12/12(土) 10:42:34.69 ID:+ekv//0b >>833 >>874に書いた左の数字と右の数値両方で順位に一貫性のあるキーを作って一回でsortするサンプル 数値は4桁以下であることを仮定してます。 use List::Util 'shuffle'; %h = map{$_ => $i++} shuffle qw{1-1 1-2 1-3 2-1 2-2 2-3 3-1 3-2 3-3}; @k1 = keys %h; print "@k1\n"; @kk = map{[sprintf("%4d%4d", /(\d+)/g), $_]} @k1; @k2 = map{$$_[1]} sort{$$a[0] cmp $$b[0]} @kk; print "@k2\n"; http://mevius.5ch.net/test/read.cgi
/tech/1548981877/883
884: 532 [sage] 2020/12/12(土) 10:47:43.50 ID:+ekv//0b こうやって幾つかコード書いてみて…>>849かTie::IxHashで十分な気がしたわw http://mevius.5ch.net/test/read.cgi/tech/1548981877/884
885: デフォルトの名無しさん [sage] 2020/12/12(土) 13:20:14.94 ID:4UtPcEnB >>881 慣れたヤツには最適解過ぎ、慣れてないヤツには意義がわからん、ということで、そんなに食いつきようがないやろ。w http://mevius.5ch.net/test/read.cgi/tech/1548981877/885
886: デフォルトの名無しさん [] 2020/12/16(水) 23:33:00.22 ID:qMOR0fCG >>833 もしそれが桁数固定で、例えばその例のように一桁の数、ハイフン、一桁の数という文字列ならば、何も考えずにそのまま文字列として比較して sort すればいい。つまりただ sort するだけ。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/886
887: デフォルトの名無しさん [sage] 2020/12/17(木) 05:05:50.95 ID:fz9fvgi4 そんなもんは9で終わる訳がなくて10も100もある筈、と自然に拡張して考える それと同様に、枝番号ならサブサブセクション以降もある筈、という拡張は 自然なのに、そっちには思い至らないんだよな http://mevius.5ch.net/test/read.cgi/tech/1548981877/887
888: デフォルトの名無しさん [sage] 2020/12/17(木) 09:44:28.00 ID:RUflbAwb >>887 外野が考えることじゃない。 >>886は、簡単なケースの例を言ってるだけだから、それでええやろ。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/888
889: デフォルトの名無しさん [sage] 2020/12/18(金) 08:38:15.55 ID:1Xc4Ax1A 「数値でソートしたい」って最初から書いてあるだろ…… http://mevius.5ch.net/test/read.cgi/tech/1548981877/889
890: デフォルトの名無しさん [sage] 2020/12/18(金) 08:53:35.39 ID:lJHaaS7Y 今だけはいいけどすぐに駄目になりそうな設計を、 裏技見つけたみたいにやりたがる奴がいるんだよな ユーザは予想を超えた無茶をしてくるものなのに http://mevius.5ch.net/test/read.cgi/tech/1548981877/890
891: デフォルトの名無しさん [sage] 2020/12/18(金) 09:55:06.92 ID:Kz3E+lfW Keep It Simple, Stupid http://mevius.5ch.net/test/read.cgi/tech/1548981877/891
892: デフォルトの名無しさん [sage] 2020/12/18(金) 09:58:16.29 ID:lJHaaS7Y よい設計というのは自然とシンプルになるものなんだよ http://mevius.5ch.net/test/read.cgi/tech/1548981877/892
893: 849 [sage] 2020/12/18(金) 16:30:11.78 ID:1Xc4Ax1A sub Schwalts { @tmp = @_; @tmp = map { [$_, /(\d+)/g ] } @tmp; @tmp = sort { $a->[1] <=> $b->[1] || $a->[2] <=> $b->[2] } @tmp; ( map { $_->[0] } @tmp); } を短く書いたのがシュワルツ変換だよ くらいの説明はした方がいいのかな。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/893
894: デフォルトの名無しさん [sage] 2020/12/18(金) 21:33:33.71 ID:rUPjISbN まだやってんのかw http://mevius.5ch.net/test/read.cgi/tech/1548981877/894
895: デフォルトの名無しさん [sage] 2020/12/22(火) 10:15:20.24 ID:YhckWNJa 最近raku触ってるけど面白すぎるわこれ、識別子をパース?して組み合わせるの楽しい もうこれ半分lispだろ http://mevius.5ch.net/test/read.cgi/tech/1548981877/895
896: デフォルトの名無しさん [sage] 2020/12/22(火) 12:14:37.88 ID:/kVuwMjM 演算子の前後に空白が必須なの、なんかイヤじゃない? ツメツメで書きたいのに。 Perl6のころだけど、オレが降りた理由のひとつ。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/896
897: デフォルトの名無しさん [sage] 2020/12/22(火) 16:09:49.34 ID:Rxnt3reZ >>895 面白いんだけどね 他の言語では無いような機能のオンパレード ちょっと先を行き過ぎてる感が強すぎるかなあ http://mevius.5ch.net/test/read.cgi/tech/1548981877/897
898: デフォルトの名無しさん [sage] 2020/12/22(火) 16:21:28.35 ID:Mi4b/BA1 言語なんて、他の言語のいいとこ取りで進化していくからな 常に便利になった部分と実験的な部分がある http://mevius.5ch.net/test/read.cgi/tech/1548981877/898
899: デフォルトの名無しさん [] 2020/12/27(日) 18:10:18.92 ID:pJIjrBUp ローカルで一番最初にperlの呼び出しの部分は#!c:/Perl/bin/perl.exeって書くけど サーバーに上げるときは毎回#!/user/local/perlというように書き直すのがめんどうだけど #!/user/local.perlのまんまでもローカルで動かす方法ありますか? http://mevius.5ch.net/test/read.cgi/tech/1548981877/899
900: デフォルトの名無しさん [sage] 2020/12/27(日) 19:39:12.76 ID:CEWAcbKQ あれ? /usr/local/perlのままでもいけるんじゃないの? Windowsはそこのパスを見てなかったような。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/900
901: デフォルトの名無しさん [sage] 2020/12/27(日) 19:46:23.03 ID:/HQdSjMP Apacheは見てる そんでApacheのあるドライブにuser/localのフォルダ作ってperl.exeをコピーしたら動くよ http://mevius.5ch.net/test/read.cgi/tech/1548981877/901
902: デフォルトの名無しさん [sage] 2020/12/27(日) 21:30:33.15 ID:CEWAcbKQ そうだっけか? ちなみに、もしそのファイルに拡張子があるならレジストリで指定する方法もある。 「windows apache レジストリ 拡張子」で検索! http://mevius.5ch.net/test/read.cgi/tech/1548981877/902
903: デフォルトの名無しさん [sage] 2020/12/28(月) 00:11:42.69 ID:oUNoRxKm perlプログラム中に指定するルートパスについてだけど open(IN,"/test.html"); my @lines = <IN>; print "@lines"; close(IN); とやっても@linesは空で何も取得できなかったけど print "<a href=\"/test.html\">リンク</a>"; でリンクをクリックするとちゃんとドキュメントルート直下のtest.htmlに飛べる これはどうしてか? test.htmlの中身は空ではない http://mevius.5ch.net/test/read.cgi/tech/15489
81877/903
904: デフォルトの名無しさん [sage] 2020/12/28(月) 00:28:09.86 ID:AD+30T3D >>903 ファイルシステムのルートとドキュメントルートはまったく異なる。 ファイルシステムはプログラム自身が処理するが、URLはまずブラウザが解釈する。 まず落ち着いてよく考えろ。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/904
905: デフォルトの名無しさん [] 2020/12/28(月) 08:24:52.02 ID:oUNoRxKm >>904 つまりperlプログラム中で指定する/test.htmlはファイルシステムのルートパスになり リンクタグで指定する/test.htmlはドキュメントルートのパスになるということですか? http://mevius.5ch.net/test/read.cgi/tech/1548981877/905
906: デフォルトの名無しさん [sage] 2020/12/28(月) 08:37:46.11 ID:9b76uWwh ドキュンルート http://mevius.5ch.net/test/read.cgi/tech/1548981877/906
907: デフォルトの名無しさん [sage] 2020/12/28(月) 21:50:36.57 ID:gLlPtDZl >>905 わかってるやん レスコジキなら他に行ってくれ http://mevius.5ch.net/test/read.cgi/tech/1548981877/907
908: デフォルトの名無しさん [sage] 2020/12/30(水) 20:09:27.64 ID:ygO1FIcm 過疎ってる方が落ち着くという人もいるらしい http://mevius.5ch.net/test/read.cgi/tech/1548981877/908
909: デフォルトの名無しさん [sage] 2020/12/30(水) 20:26:20.53 ID:ZDzqqnZf 初心者が嫌いな「上級者」で過疎っているほうが落ち着くなら、このスレがいいな。 【Perl上級者コーナーPart01】 https://medaka.5ch.net/test/read.cgi/php/1024741312/ http://mevius.5ch.net/test/read.cgi/tech/1548981877/909
910: デフォルトの名無しさん [sage] 2020/12/30(水) 21:55:58.30 ID:Fpo/gio8 >>907 わかってるとはいえんよ。 結果のおうむ返しだけみたいだからな。 落ち着いて考えればわかるはずだし、それでしっかり納得したほうがいいことだから、元コメに返事はしないが。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/910
911: デフォルトの名無しさん [sage] 2021/01/03(日) 17:25:22.42 ID:Lv3VCxJc ブラウザのクッキーを許可してるかどうかを調べるにはどうしたらいいんですか? クッキーを書き込めたら許可されているというやり方だと 書き込んだ直後はクッキー読み取れない 更新ボタンでページを更新しないとクッキー読み取れないので他のやり方で http://mevius.5ch.net/test/read.cgi/tech/1548981877/911
912: デフォルトの名無しさん [sage] 2021/01/03(日) 17:33:27.51 ID:qCTYrijY お、今年初めの質問だね。 君の悩みは質問箱住人が解決するよ。 ささ、甘酒どぞ。つ甘 みんなーお客さんだよー。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/912
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 90 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.010s