- 1 名前:デフォルトの名無しさん mailto:sage [2007/06/11(月) 03:29:47 ]
- "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 ● 2006/12/21現在の最新版: 5.8.8 ● 2006/12/21現在の開発版: 5.9.3 前スレ Perlについての質問箱 30箱目 pc11.2ch.net/test/read.cgi/tech/1173880452/ リンク集は>>2-3 過去スレは>>4
- 86 名前:デフォルトの名無しさん mailto:sage [2007/06/18(月) 12:21:14 ]
- もうちょっとシンプルにならんかなぁ
#!/usr/bin/perl use strict;use warnings; my(%chinko,%manko);$/=undef; print "$_:$chinko{$_}\n" for sort {$chinko{$b}<=>$chinko{$a} || $a cmp $b} grep !$manko{$_}++ , map {$chinko{$_}++;$_} split /\s+/,lc <STDIN>;
- 87 名前:デフォルトの名無しさん mailto:sage [2007/06/18(月) 13:32:46 ]
- そういう変なのをもっともらしく貼り付けるから perl はダメとかいわれるんじゃないの?
- 88 名前:デフォルトの名無しさん mailto:sage [2007/06/18(月) 13:47:23 ]
-
これはこれで綺麗に見えるのだが、 その感性を会得出来ないのは、 まだ君が未熟である証拠であろう。
- 89 名前:デフォルトの名無しさん mailto:sage [2007/06/18(月) 13:55:00 ]
- >>86
%chinkoと%mankoわけるのは無駄だろ?
- 90 名前:デフォルトの名無しさん mailto:sage [2007/06/18(月) 14:51:34 ]
- > これはこれで綺麗に見えるのだが、
廃人になる前にドラッグやめたほうがいいよ。
|

|