[過去ﾛｸﾞ]
Perlについての質問箱 64箱目 (1002ﾚｽ)
Perlについての質問箱 64箱目 http://mevius.5ch.net/test/read.cgi/tech/1548981877/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
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
263: デフォルトの名無しさん [sage] 2020/02/23(日) 12:43:19.44 ID:1MmoNroU >>261 シェルからふつうに起動したら、親プロセスとの関連でトラブルが発生するところはどちらも同じ。 というか、むしろLinuxのほうがわかりにくくてひどい。 disownとかnohupとか知ってるか？ http://mevius.5ch.net/test/read.cgi/tech/1548981877/263
264: デフォルトの名無しさん [] 2020/02/24(月) 04:42:11.62 ID:jrwZftYn 知ってるよ。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/264
265: デフォルトの名無しさん [sage] 2020/02/25(火) 12:21:34.80 ID:Z4NIrtJK >>260 何か使い方間違ってない？ 次のようなコマンドで、普通に通るぞ。 wperl.exe "C:\utp\foobar.PL" "C:\foo\bar.txt" http://mevius.5ch.net/test/read.cgi/tech/1548981877/265
266: デフォルトの名無しさん [sage] 2020/02/25(火) 23:35:33.10 ID:Vpd+P02x >>265 >>258 http://mevius.5ch.net/test/read.cgi/tech/1548981877/266
267: デフォルトの名無しさん [sage] 2020/03/05(木) 09:29:31.48 ID:hJr+GlCd ブラウザでは普通に見られる楽天市場の商品ページ （item.rakuten.co.jp/shop_mei/a012345/）を get 出来なくなった。 ユーザーエージェントやらリファラはイジってみたけど http://mevius.5ch.net/test/read.cgi/tech/1548981877/267
268: デフォルトの名無しさん [sage] 2020/03/05(木) 12:43:29.56 ID:eb4C0HQQ active perl の ppm がなくなっていろんなモジュールが動かないのだが、困ってるの俺だけ？ ググっても誰も文句言ってないな http://mevius.5ch.net/test/read.cgi/tech/1548981877/268
269: デフォルトの名無しさん [sage] 2020/03/05(木) 12:50:46.42 ID:WFS2X5DF >>268 >>142 でオレが文句を言ったが。 結局、一生5.22 を使い続けることにした。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/269
270: デフォルトの名無しさん [sage] 2020/03/05(木) 14:56:24.55 ID:NI6SkVuR 新しめのバージョン追ってる人はもう大半がactive perl捨ててstrawberry perlに移住したんじゃね http://mevius.5ch.net/test/read.cgi/tech/1548981877/270
271: デフォルトの名無しさん [sage] 2020/03/05(木) 20:36:47.91 ID:HImUaDHG つい最近ppm使ったような http://mevius.5ch.net/test/read.cgi/tech/1548981877/271
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 731 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.013s