[過去ログ]
プログラミングのお題スレ Part13 (1002レス)
プログラミングのお題スレ Part13 http://mevius.5ch.net/test/read.cgi/tech/1549160513/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
367: デフォルトの名無しさん [sage] 2019/02/24(日) 10:41:19.01 ID:gbE7FXAb >>364 Perl5 ~ $ echo -n hello | perl -naF -E 'say for @F' h e l l o http://mevius.5ch.net/test/read.cgi/tech/1549160513/367
368: デフォルトの名無しさん [sage] 2019/02/24(日) 10:45:19.09 ID:gbE7FXAb >>358 Perl5 sleep 3*60; print "BEEP!\n"; http://mevius.5ch.net/test/read.cgi/tech/1549160513/368
370: デフォルトの名無しさん [sage] 2019/02/24(日) 11:01:40.94 ID:gbE7FXAb >>359 Perl5 use List::Util shuffle; @a = shuffle 1..5; print "shuffled) @a\n"; use threads; use threads::shared; my @b: shared; sub f { my $n = shift; sleep $n; push @b, $n; } push @thr, threads->create(\&f, $_) for @a; $_->join() for @thr; print "sorted ) @b\n"; 実行結果 ~ $ perl 13_359.pl shuffled) 5 3 1 2 4 sorted ) 1 2 3 4 5 http://mevius.5ch.net/test/read.cgi/tech/1549160513/370
371: デフォルトの名無しさん [sage] 2019/02/24(日) 11:04:08.38 ID:gbE7FXAb >>370 しまった、 がそのまま表示されている…orz 全角スペースに置換して修正 >>359 Perl5 use List::Util shuffle; @a = shuffle 1..5; print "shuffled) @a\n"; use threads; use threads::shared; my @b: shared; sub f { my $n = shift; sleep $n; push @b, $n; } push @thr, threads->create(\&f, $_) for @a; $_->join() for @thr; print "sorted ) @b\n"; 実行結果 ~ $ perl 13_359.pl shuffled) 5 3 1 2 4 sorted ) 1 2 3 4 5 http://mevius.5ch.net/test/read.cgi/tech/1549160513/371
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.068s