- 1 名前：デフォルトの名無しさん [2012/03/02(金) 14:30:16.30 ]
- CGI についての質問は板違いです。WEB プログラミング板でどうぞ。
CGI と Perl の区別がつかない人も WEB プログラミング板に行ってください。
(WEB プログラミング板: hibari.2ch.net/php/ )
このスレでは(CGI 以外の)純粋にPerlのみに関係する質問を取り扱っていこうと思います。
スレ違いの質問にはスルーか、速やかな誘導をお願いします。
"The duct tape of the Internet" こと、Perl についての質問箱です。
"There's more than one way to do it" ということで、
Perl の奥深さについて皆で語り合い、追求してまいりましょう。
www.perl.org/get.html
Download Latest Stable Source (5.14.2)
▼ 前スレ
Perlについての質問箱 50箱目
toro.2ch.net/test/read.cgi/tech/1326823096/
リンク集は >>2-3
Perl 日本語処理の基礎の基礎 >>4
- 212 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 12:25:05.64 ]
- >>211
CPUの数はいくつありますか？(マルチコアですか？)
- 213 名前：デフォルトの名無しさん [2012/03/20(火) 12:27:53.24 ]
- >>212
CPUいくつあるかわからないので
１つの場合と複数の場合について教えてください
- 214 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 12:32:12.48 ]
- >>211
すべては不定です
- 215 名前：デフォルトの名無しさん [2012/03/20(火) 18:03:41.46 ]
- 処理の順番が狂うとうまくいきません
yomikomi.cgi
y-1：readlockファイルがない場合
y-2：writelockファイルを作る
y-3：readlockがあればsleepで待つ
y-4：読み込んで表示
kakikomi.cgi
k-1：readlockファイルを作る
k-2：writelockファイルを作る
k-3：sleepで待ってreadlockとwitelockファイルが作成できたら
k-4：書き込む
処理の順番がy-1～y-4,k-1～k-4となる場合や
k-1,y-1,k-2,y-2,k-3,y-3,k-y,y-4となる場合は問題ないのですが
ｙー１とｙー２の間にｋー１とｋー３が割り込んだら
ロックができない状態になります
どうすればいいんでしょうか？
- 216 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 18:17:08.11 ]
- そういうのはひとつのロックファイルで排他ロックと共有ロックを使う
- 217 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 18:52:23.67 ]
- DB使いなよ。
- 218 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 19:09:26.49 ]
- >>217
バカのひとつおぼえだな
- 219 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 19:12:40.39 ]
- >>218
もしかしてDBまでモダンだと思ってるの？
- 220 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 19:17:40.90 ]
- >>217
＝─‐＼＼‐ ／─'''''ニ二＼''' |レﾚゝゝ､＼
￣く<<く >, ﾞ､／＜三三二＼￣＼ゝゝゝゝゝゝﾞ''ヽ､
＜<<<〈__入 ﾞ､く彡三三三二ヽくゝ＼メメメゝ､＿ゝ､＼
くく<<<<<< ﾞ､ ﾞ､ミ三三二ニ─ゝゝゝゝゝ,,,,,,,､ '（ ﾞ''ヽ､ヽ､
くくくくくく彡‐ヽ ﾞ､ﾐ三三二ニ'''くくゝゝ＿ゝゝ､＼＼＿,>」ﾉ,
く く く く く 彡ﾞ､ﾞ､三三二ニ‐くゝ､／ ,,,,,,,,メメゝヽ''''"ゝゝﾞ丶､
二─二二彡彡､ﾞ､三三二==くメゝ／ ﾞ'ヽ､メゝゝゝゝゝゝゝﾞ''ヽ-､,,,,,,＿
‐'''"￣ ＼彡彡ﾐ､ﾞ､三二=''"く<メ/:: ＼''-､メメゝゝゝ＿ゝ ､ ,,､ヽヽ
､ ,,,,- ﾞ彡／/ヽﾞ､三二＝ くゝ/:::.... ＼>∠ﾚ-,-‐ニ二メヽ''ヽ ﾉ
ﾞヽ､,,,-‐//_//／,,､ﾞ､三二= ﾞ､ ""''' ヽ＞／／ﾚﾚヽ,,＿__ /
-,,,,,,-‐'''"""/////,,ヽ ﾞ､三二─ ﾞヽ. ／／-ﾍﾍ,､ ﾚレレﾚノ さあ願いを言え
''" ,ｌ|"////ﾉ,､＼彡'''''‐-ニ,､ ::::::::::,,,,,,,,／／ ﾞヽﾌ/|/| ﾚ' どんな願いも聞き流してやろう。
- 221 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 19:18:45.87 ]
- >>220
面白いと思ったの？
- 222 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 19:27:35.32 ]
- ドラゴンボールな、はいはい。
- 223 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 19:59:24.98 ]
- /`ﾟ`ii´ﾟ`ヽ
- 224 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 21:20:27.97 ]
- 米政府 韓国メーカーに不当廉売関税適用へ
米商務省の決定文によると、サムスン電子の冷蔵庫に対しては韓国製に５．１６％、メキシコ製に１５．９５％の同関税を課す。
ＬＧ電子については、韓国製に１５．４１％、メキシコ製に３０．３４％をそれぞれ課す。
同関税はダンピング（不当廉売）によって、国内産業が被害を受けないよう通常賦課される関税に加え特別に課す税金。
japanese.yonhapnews.co.kr/headline/2012/03/20/0200000000AJP20120320001000882.HTML
【FTA】 米国政府 「サムスンとLGは不当廉売なので関税をもらいます！」 ★2
engawa.2ch.net/test/read.cgi/poverty/1332236917/
前スレ
【FTA】 米国政府 「サムスンとLGは不当廉売なので関税をもらいます！」
engawa.2ch.net/test/read.cgi/poverty/1332219745/
- 225 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 21:58:33.06 ]
- >>211, >>215
どうなるかは不定(決まってない、どっちになるか分からない)、としか答えようがないでそ。
どうしても特定の順番で処理させなきゃいけないんなら、
排他ロックを適切にかけながら処理するしかない。
そしてもちろん排他ロックにはアトミックな仕掛けを使わなくてはいけない。
ただそれだけのこと。
DB使えってのはDBMSがそのへんの排他制御を比較的よきにはからってくれるから。
- 226 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 22:29:23.12 ]
- flockとかそういう話じゃなくて？
- 227 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 22:31:28.02 ]
- flockでもいいんじゃない？使える環境なら
- 228 名前：208 [2012/03/20(火) 22:32:19.30 ]
- どなたか宜しければお願いします _ _
perldoc辺りが最善手になるんでしょうか・・・
- 229 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 22:35:17.84 ]
- プログラミングの基礎を学びたいのか実戦で効率的にやりたいのかどっち？
- 230 名前：208 mailto:sage [2012/03/20(火) 23:05:01.65 ]
- >>229
返信有難う御座います。プログラミングの基礎を学びたいわけではないです。
かといって、実践で（仕事で）使えればそれで良いかと言えば
Perlは既に仕事で何度も使っているのでそういう訳ではないです。
Perlの仕様を隅々まで（と言っても限度はありますが
少なくともラクダ本にある程度は）把握したいです。
ですが、ラクダ本をもう一度全て読むのは分量があるので御免被りたいです。
ワガママですみません；
- 231 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 23:09:53.61 ]
- >>230
Perlの隅々の仕様の把握ならラクダ本ほど楽な方法も中々ないぞ
一気に読もうとせず、毎日コツコツ読むだけでも随分違うかと
今まで知らなかった仕様を知ることができるかもよ
- 232 名前：デフォルトの名無しさん mailto:sage [2012/03/20(火) 23:52:47.86 ]
- >>230
www.modernperlbooks.com/
Modern Perlはそこそこまとまってた。
ざっくりPDF版を読んでみたら。
- 233 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 00:43:36.81 ]
- 毎日20ページ読むだけで2週間ありゃ読み終わる
- 234 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 00:52:29.28 ]
- １ページの半分読んで眠くなる
- 235 名前：デフォルトの名無しさん [2012/03/21(水) 01:08:33.44 ]
- ディレクトリがあるかどうか調べるとき
ディレクトリがない場合というのelseやunlessを使うしか方法はないんでしょうか？
elseやunlessはあまり使いたくないんだけど
if(-d "test"){
print "ディレクトリがあります";
}
else{
print ""ディレクトリがありません;
}
- 236 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 01:34:57.79 ]
- not -d
- 237 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 01:39:19.27 ]
- >>230
そんな君にはポケットリファレンスがよかろう
- 238 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 01:53:56.47 ]
- あの青いやつか
- 239 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 09:40:35.99 ]
- 痴漢するときに、入力したファイルをそのまま変換するのって
どんなオプションでしたっけ
- 240 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 09:42:10.93 ]
- 自己解決しました。 やっぱり愛なのね。
- 241 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 09:53:20.77 ]
- >>239,240
なにうまいこというとんねん！
- 242 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 10:27:36.31 ]
- 関数の戻り値を変数に代入する場合、そのまま利用する場合と比較して、メモリは倍必要になるのでしょうか？
my $data = large_data();
print $data;
print large_data();
- 243 名前：208 mailto:sage [2012/03/21(水) 11:17:49.63 ]
- >>231
ありがとうございます！検討してみます。
>>232
まさにこういうの探していました！本当に有り難うございます _ _
みなさん長々とお付き合いありがとうございました _ _
- 244 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 15:59:42.57 ]
- >>243
行末の「 _ _」が気になる。なんの暗号だ。
- 245 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 16:00:40.80 ]
- >>236
> not -d
! -d を使ってる。理由は忘れた。
- 246 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 16:06:37.64 ]
- >>244
m(_ _)m 的なものだと思われる
- 247 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 16:08:37.06 ]
- m(_ _)m → m _ _ m → _ _ → ？
- 248 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 16:33:26.80 ]
- ( @益@)
- 249 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 16:42:41.27 ]
- >>246
>>247
なるほど。Thanks.
- 250 名前：デフォルトの名無しさん [2012/03/21(水) 19:09:23.68 ]
- 排他ロックはmkdirを使うやりかたがいろいろ紹介されていますが
共有ロックはflockを使う以外では見たことありません
flockを使わないで共有ロックをするのは隙間ができたりして難しいのでしょうか？
- 251 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 19:26:00.44 ]
- >>250
別に難しくもなんともないが、mkdirだのあのあたりの方法は
プログラムが死んだときにロックしっぱなしになるので
自分では絶対に採用しないな。
- 252 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 19:32:51.02 ]
- perldoc.jp/func/exec
'exec' は Perl の組み込み関数ではありません。
え？
- 253 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 19:37:17.22 ]
- hint: 404
- 254 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 21:56:47.17 ]
- >>252
おいおい知らなかったのかよ
- 255 名前：デフォルトの名無しさん mailto:sage [2012/03/21(水) 23:54:25.80 ]
- シェルの関数でしょ
- 256 名前：デフォルトの名無しさん mailto:sage [2012/03/22(木) 00:33:19.22 ]
- 最終的にシェルだとかシステムコールにたらい回されるにしたって、
perlfuncに載ってるexecはPerlの組み込み関数でしょ。
perldoc.jp/index/function
execのほかにforkやexitもだけど、リンクはあるのにクリックすると組み込み関数じゃありませんってのはおかしいので何かの手違いだろう。
- 257 名前：デフォルトの名無しさん mailto:sage [2012/03/22(木) 00:38:24.69 ]
- perldoc.jp/func/adelic
手違いっぽいね
- 258 名前：デフォルトの名無しさん mailto:sage [2012/03/22(木) 00:41:59.19 ]
- そりゃあ簡単だ
forkなんてUNIXの方の機能じゃん
だからperlのモンじゃあない
execもexitも同じ、perlの組み込みじゃない
- 259 名前：デフォルトの名無しさん mailto:sage [2012/03/22(木) 01:02:12.03 ]
- 手違いというより単に翻訳済みのドキュメントがないってことでしょ
- 260 名前：デフォルトの名無しさん mailto:sage [2012/03/22(木) 01:44:20.59 ]
- >>258
システムコールforkをPerlから呼ぶためにはPerlの組み込み関数forkが必要だろ。
それに、perlはUNIXだけのモンじゃあない。Perlの関数forkは非UNIXではそれに応じた動作をしなけりゃならない。
>>259
perldoc.jp/perlfunc からは見れるからやっぱり手違いだろう。
- 261 名前：デフォルトの名無しさん mailto:sage [2012/03/22(木) 01:52:16.27 ]
- んじゃそっちからこっちへアップデートされてないってことで
|
 |
