[過去ﾛｸﾞ]
Perlについての質問箱 64箱目 (1002ﾚｽ)
Perlについての質問箱 64箱目 http://mevius.5ch.net/test/read.cgi/tech/1548981877/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
233: デフォルトの名無しさん [sage] 2020/02/20(木) 00:35:55.90 ID:1VYpL0NG スレに人が来ていてオジサンうれしいよ http://mevius.5ch.net/test/read.cgi/tech/1548981877/233
234: デフォルトの名無しさん [sage] 2020/02/20(木) 01:29:24.69 ID:bivTkZxZ 最近はPerlのことを喋ると謎の軍団が叩きに来るからな ネット上で喋れる場所がなくなった 迫害されてる気分 http://mevius.5ch.net/test/read.cgi/tech/1548981877/234
235: デフォルトの名無しさん [] 2020/02/20(木) 13:15:43.08 ID:fXEOX4Gg Perl/Tk は使い物にならん。プログラムが大きくなると動かないでやんのw Perl/Qt を推進していくべき。 ここの人はPerlでGUIを使ったりしてる？ http://mevius.5ch.net/test/read.cgi/tech/1548981877/235
236: デフォルトの名無しさん [sage] 2020/02/20(木) 15:23:29.96 ID:Gm5IubjH Windows限定だが、Win32-GUIを使ってるよ。 インストールして、次のバッチファイルを走らせると、 細かい具体例のデモが見れる。 C:\Perl\site\bin\win32-gui-demos.bat http://mevius.5ch.net/test/read.cgi/tech/1548981877/236
237: デフォルトの名無しさん [sage] 2020/02/20(木) 17:36:38.86 ID:Nllb9nDe >>231 そうではなくて独自の記号にコンテキスト毎に意味を詰め込む様な言語思想のこと言ってるんだがね。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/237
238: デフォルトの名無しさん [sage] 2020/02/20(木) 18:47:26.22 ID:CqCGFBWH 入力も出力もテキストで完結してるのがいい と思ってたけど、最近excelデータを入出力に使い出した http://mevius.5ch.net/test/read.cgi/tech/1548981877/238
239: デフォルトの名無しさん [sage] 2020/02/20(木) 20:33:42.77 ID:0HRLUjae 短絡論理演算子を使うという方法もあるが、お気に召すかどうかは知らん。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/239
240: デフォルトの名無しさん [sage] 2020/02/20(木) 20:44:08.31 ID:CqCGFBWH >>227の例だと $var = $table{$var} or $var で概ね動くけど、空文字列なんかが入ってた時に誤動作する 判別はdefinedしか無いとして、それでも書ける短絡評価とは http://mevius.5ch.net/test/read.cgi/tech/1548981877/240
241: デフォルトの名無しさん [sage] 2020/02/20(木) 21:36:24.51 ID:uxa6Suua defined-or使うだけじゃないの？ $var = $table{$var} // $var; http://mevius.5ch.net/test/read.cgi/tech/1548981877/241
242: デフォルトの名無しさん [sage] 2020/02/20(木) 22:00:38.63 ID:0HRLUjae アンカー入れ忘れたのによく分かってくれたな。ありがとう。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/242
243: デフォルトの名無しさん [sage] 2020/02/20(木) 22:37:06.65 ID:CqCGFBWH そんな演算子知らん http://mevius.5ch.net/test/read.cgi/tech/1548981877/243
244: デフォルトの名無しさん [sage] 2020/02/20(木) 23:16:35.88 ID:NRacWxGd null合体演算子は最近の流行りやぞ？ http://mevius.5ch.net/test/read.cgi/tech/1548981877/244
245: デフォルトの名無しさん [sage] 2020/02/21(金) 01:54:46.68 ID:dQ0Yz//t //流行ってる気がしない。 新しい機能を積極的に使う人はそもそもperlを使わないのではないか。 断固外氏のブログのネタにしかなってなさそう。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/245
246: デフォルトの名無しさん [sage] 2020/02/21(金) 02:18:25.95 ID:YvRUEPlL 5.8じゃ使えないからね それだけで使わない理由になる http://mevius.5ch.net/test/read.cgi/tech/1548981877/246
247: デフォルトの名無しさん [sage] 2020/02/21(金) 03:26:53.00 ID:6/adwu75 細かいけど優先度は// > = > orだよ http://mevius.5ch.net/test/read.cgi/tech/1548981877/247
248: デフォルトの名無しさん [sage] 2020/02/21(金) 03:54:06.99 ID:6/adwu75 >>227と等価なのは>>241か この例はdefinedだったから適用できるのね 判定が任意だとするとやはり2度書くしかないかね 例えば if ($table{$var} % 3) { $var = $table{$var}; } perlは同一値への参照と解釈して2回読みにはいかないという気の利いたことはしないだろうね エクセプション入ったら変わる可能性あるしね http://mevius.5ch.net/test/read.cgi/tech/1548981877/248
249: デフォルトの名無しさん [sage] 2020/02/21(金) 03:58:30.72 ID:6/adwu75 //=の逆バージョンあったらいいなとはたまに思うね そこまで必要性ないという判断でないのだろうけども http://mevius.5ch.net/test/read.cgi/tech/1548981877/249
250: デフォルトの名無しさん [sage] 2020/02/21(金) 07:05:24.88 ID:TnPEnehp $table{$var} が $_ に入るような無害な処理をしておいて、 $var = $_ % 3 ? $_ : $var と等価なシンタックスシュガーで処理する みたいなことができれば http://mevius.5ch.net/test/read.cgi/tech/1548981877/250
251: デフォルトの名無しさん [sage] 2020/02/21(金) 09:05:21.00 ID:KvZFDIbR 2回読みたくないというのがどういうレベルでの事か分からんが ソースコードの見た目だけならサブルーチンに押し込めばどうとでも #!/usr/bin/perl -w use strict; use Scalar::Util qw(looks_like_number); sub dp { defined $_[0] ? "d[$_[0]]" : 'u[]'; } sub if_true(&$$) { local $_ = pop; $_[1] = $_ if &{$_[0]}; } my %table = ('' => 1, 0 => 2, a => 3, b => 4, c => 0, d => '', e => undef); for my
$var (sort keys %table) { print dp($var), dp($table{$var}); if_true { looks_like_number($_) && $_ % 3 } $var => $table{$var}; print " => var[$var]\n"; } http://mevius.5ch.net/test/read.cgi/tech/1548981877/251
252: デフォルトの名無しさん [sage] 2020/02/21(金) 09:57:55.58 ID:PzVMR7sv サブルーチンとか甘え。謎の記号を使って魔法のようなコードを書くのがPerlの醍醐味。可読性は悪 http://mevius.5ch.net/test/read.cgi/tech/1548981877/252
253: デフォルトの名無しさん [] 2020/02/21(金) 12:24:11.67 ID:TKnLlA6x >>235 昔々 Perl/Tk 使おうと思ったが日本語対応が出来てなくて止めたことがある。 それ以来 Perl で GUI はやってない。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/253
254: デフォルトの名無しさん [sage] 2020/02/21(金) 14:01:10.98 ID:OOdvSVAe 絶対やらないけど $_ % 3 and $var = $_ for $table{$var}; http://mevius.5ch.net/test/read.cgi/tech/1548981877/254
255: デフォルトの名無しさん [sage] 2020/02/21(金) 15:45:08.67 ID:ooEapY6E >>253 それ、5.6以前の話？記憶が曖昧だけど、utf8に対応した5.6あたりから、Tkで日本語使えたような気がするけど。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/255
256: デフォルトの名無しさん [] 2020/02/21(金) 18:15:13.09 ID:TKnLlA6x >>255 忘れた。20年ぐらい前だったかな？ http://mevius.5ch.net/test/read.cgi/tech/1548981877/256
257: デフォルトの名無しさん [sage] 2020/02/22(土) 22:24:09.42 ID:pvGxmVZm 裏でずっと何かしてるスクリプトを走らせておきたい ActivePerlのウィンドウが出るのが嫌なので、wperlを起動してウィンドウを出さない でも、wperlを起動する為のbatファイルのウィンドウがずっと出てる batファイル以外のいい起動方法はないだろうか http://mevius.5ch.net/test/read.cgi/tech/1548981877/257
258: デフォルトの名無しさん [sage] 2020/02/22(土) 22:46:33.37 ID:KpqdZij5 >>257 start "" "wperl ..." http://mevius.5ch.net/test/read.cgi/tech/1548981877/258
259: デフォルトの名無しさん [sage] 2020/02/22(土) 22:47:18.24 ID:+QQ7ccWr ショートカットでよくね？ http://mevius.5ch.net/test/read.cgi/tech/1548981877/259
260: デフォルトの名無しさん [sage] 2020/02/22(土) 23:01:19.35 ID:pvGxmVZm wperl以降を""で括ると動かないけど、無くせば動いた これでサーバ監視ができる http://mevius.5ch.net/test/read.cgi/tech/1548981877/260
261: デフォルトの名無しさん [] 2020/02/23(日) 06:57:52.64 ID:6djC7Yo0 Linuxなら何も考えずにできるが・・・ http://mevius.5ch.net/test/read.cgi/tech/1548981877/261
262: デフォルトの名無しさん [sage] 2020/02/23(日) 07:18:43.14 ID:u5LzmB/p pingが通るようにしてしまえばwindowsでもそういうのは既にある http://mevius.5ch.net/test/read.cgi/tech/1548981877/262
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 740 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.017s