- 1 名前：デフォルトの名無しさん mailto:sage [2008/09/21(日) 12:22:12 ]
- "The duct tape of the Internet" こと、Perlについての質問箱です。
"There's more than one way to do it" ということで、
Perlの奥深さについて皆で語り合い、追求してまいりましょう。
CGIについての質問は板違いです。WEBプログラミング板でどうぞ。
CGIとPerlの区別がつかない人もWEBプログラミング板に行ってください。
( WEBプログラミング板 pc11.2ch.net/php/ )
CGIの質問は答えが Perlと全然関係ない話に帰着する場合が
多かったりするのでWEBプログラミング板に行って聞いたほうが得ですよ。
このスレでは(CGI以外の)純粋にPerlのみに関係する質問を取り扱っていこうと思います。
スレ違いの質問にはスルーか、速やかな誘導をお願いします。
www.perl.org/get.html
● 2008/09/21 現在の最新版（安定版）: 5.10.0
● 2008/09/21 現在の開発版: 5.9.5
▼ 前スレ
Perlについての質問箱 37箱目
pc11.2ch.net/test/read.cgi/tech/1218449440/
リンク集は>>2-3
Perl 日本語処理の基礎の基礎 >>4
過去スレは>>5-6 あたり
- 620 名前：デフォルトの名無しさん mailto:sage [2008/12/04(木) 18:33:06 ]
- >>618
「DBD-mysql PPM リポジトリ」でググッて好きなページを参照して。
- 621 名前：デフォルトの名無しさん mailto:sage [2008/12/04(木) 21:58:48 ]
- 1から99までに含まれる奇数を出力するプログラムを書いてみたんですけど
これ以上短くすることは可能ですか？
print$_%2?"$_ ":()for 1..99
- 622 名前：デフォルトの名無しさん mailto:sage [2008/12/04(木) 22:08:38 ]
- $_%2&& print for 1..99
- 623 名前：デフォルトの名無しさん mailto:sage [2008/12/04(木) 22:22:24 ]
- print $_*2+1,' 'for 0..49
- 624 名前：621 [2008/12/04(木) 22:46:56 ]
- >>622
即レスありがとうございます
なるほど！！
でもそれだと半角スペースがないですよね？
できれば半角スペースは入れたかったんですけど…
>>623
ありがとうございます
普通に足していく方法ですか
確かに短くなりますねｗ
うまく説明できないんですけど演算を上手くつかって短くしたいんですよね
説明不足ですみませんでした
- 625 名前：デフォルトの名無しさん mailto:sage [2008/12/04(木) 23:03:57 ]
- print$_%2?$_:' 'for 1..99
- 626 名前：デフォルトの名無しさん [2008/12/04(木) 23:59:40 ]
- >>620
ありがとうございますｍ(_ _)ｍ
- 627 名前：621 mailto:sage [2008/12/05(金) 00:59:21 ]
- >>625
ありがとうございます
偽の場合の式をうまく使ってますね
何か書かないといけないから空のリストを置いてたんですけど
これだと無駄がない感じになりますね
- 628 名前：デフォルトの名無しさん mailto:sage [2008/12/05(金) 02:11:14 ]
- $,=" ";print 1..99
- 629 名前：デフォルトの名無しさん mailto:sage [2008/12/05(金) 02:14:04 ]
- 痛たたた……
- 630 名前：デフォルトの名無しさん mailto:sage [2008/12/05(金) 02:16:48 ]
- あ、奇数か。スマソ
$,=" ";print grep{$_&1}0..99
短くないな…
|
 |
