新しくperlで標準で欲しい関数は？ (203ﾚｽ)
上下前次1-新
41(1): 名無しさん＠お腹いっぱい。 [age] 01/12/27 04:28 ID:??? AAS
関数って訳じゃないけど、範囲指定できるコメントアウトが欲しい。
Cでいうところの/* */のような。
42(2): かもかも 01/12/27 04:35 ID:GPy3eH+b(1) AAS
=start
ソース
=cut
43(3): 名無しさん＠お腹いっぱい。 01/12/27 12:34 ID:J5IqrraU(1) AAS
日本語文字列で文字コードを気にせず検索できる
jindex($str)
44: 名無しさん＠お腹いっぱい。 01/12/27 19:54 ID:Nt05OgVJ(1) AAS
>>43
そういうのはjperlの方で実装してくれればいいや。
45: 01/12/28 00:08 ID:fpyzPwrd(1) AAS
>>43
utf8は嫌か？
46: 名無しさん＠お腹いっぱい。 01/12/28 01:04 ID:P8B6/AoK(1) AAS
[日本語文字列で文字コードを気にせず検索できる]
に一票
47(2): 名無しさん＠お腹いっぱい。 01/12/28 07:46 ID:WCOesOKQ(1) AAS
>>42
41じゃないけど。
if (
$a == 1 /* 〜判定 */
or $a == 2 /* 〜判定 */
)
みたいのがほしい。
48(1): 47 01/12/28 07:47 ID:??? AAS
書いてみたら意味不明だった…これなら今のPerlでできるじゃん。。
↑を一行にまとめてあるような場合の話ね。
49(6): 名無しさん＠お腹いっぱい。 01/12/28 22:34 ID:??? AAS
hashをマージする関数は欲しいなぁ。書いても3行なんですけどね。
50: ダメ男 01/12/29 03:17 ID:ZRazpEzQ(1) AAS
文字コード変換専用の関数があればいいかもね。いちいちjcode.plを
呼び出しているCGIが多くてウンザリするから。
まあわたしの場合は１つのサブスティチュートに書き替えているけどね。
51(2): 名無しさん＠お腹いっぱい。 01/12/29 03:42 ID:vH5mwYOf(1) AAS
画像ファイルの拡大/縮小
くらいだけでもできたらうれしい。
52(1): 名無しさん＠お腹いっぱい。 01/12/29 03:45 ID:??? AAS
じゃ俺はsendmail関数 (笑
53: 名無しさん＠お腹いっぱい。 [0] 01/12/29 04:01 ID:??? AAS
高確率のロト６予想関数
54: 名無しさん＠お腹いっぱい。 01/12/29 17:12 ID:YO8PVCNz(1) AAS
>>51
それはモジュールでやるべきことでしょう。さすがに。
>>49
たしかに欲しい。
55(2): 名無しさん＠お腹いっぱい。 01/12/29 17:19 ID:??? AAS
"Hello,world!!\n"を印字する関数。書いても1行なんですけどね。
56: 名無しさん＠お腹いっぱい。 [sage ...ﾜｹﾈｪ] 01/12/29 18:37 ID:??? AAS
>>55
たしかに欲しい
57: 名無しさん＠お腹いっぱい。 01/12/29 19:12 ID:??? AAS
>>55
あらゆる言語で車輪の再開発がなされる部分だしね。
58: 名無しさん＠お腹いっぱい。 01/12/29 19:16 ID:??? AAS
uniq,cp,mv
59: 名無しさん＠お腹いっぱい。 01/12/29 19:20 ID:??? AAS
ビルトインクラスPerlWorldにジョークでHelloメソッドがあったら笑う。
60(2): 名無しさん＠お腹いっぱい。 01/12/30 00:54 ID:??? AAS
こういう事したい if $sita < $naka < $ue;
61: 名無しさん＠お腹いっぱい。 01/12/30 02:06 ID:??? AAS
>>60 Perl6でできる予定
62(1): 名無しさん＠お腹いっぱい。 [ ] 01/12/30 03:14 ID:??? AAS
関数じゃないけど、C言語みたいに、
sub funcname($val1,$val2,...,$valn){...}
こういう風にサブルーティンを書けるようにしてほしい。
もちろん仮引数はローカル変数で。
63: _gunzip 01/12/30 06:27 ID:??? AAS
>>3
Parrotの構文ツリー形式を吐くパーサを自分で書けばいいよ。
実例としてはparrot/languages/jako辺りのパーサ/コンパイラを見てくれ。
外部ﾘﾝｸ:dev.perl.org
------
The parser will permit you to change its rules.
Rule sets define major languages (Perl, C, Python, Java, etc.)
and you can write new rules to define minor languages
(Perl without $ @ % sigils, Python with curly braces, etc.).
------
>>6
Perl6 RFCでも、スレッドに関して幾つか提案がなされてるけど、
(1, 178, 185ほか)RFC185のような実装になるみたい。
RFC 185: Thread Programming Model
外部ﾘﾝｸ[html]:dev.perl.org
>>14
./Configureの際に指定できるよ。
...最近は設定プログラムにGNU Autoconfを利用した物がほとんどで、
Perlで使っているMetaconfig(by Larry Wall他)は滅多に見かけない...。
(autoconfは大抵質問してこないから楽だけど。)
>>25
Perl6ではXS の代わりに Inline::* 系が標準になるので、
他言語で拡張パッケージを書くのはかなり楽になると思います。
>>41-42 >>47-48
RFC5, 102で提案されているけど、Larryは
外部ﾘﾝｸ:dev.perl.org の"Inline Comments for Perl"
で述べているとおり導入に消極的。
その代わりにプラグマinline_commentとかが追加されたりして。
Perl5でcppの使える環境なら-Pオプションで、コンパイル前に
Cプリプロセッサに食わせてやることで実現が可能だけど。
Perl6の"is"オペーレータで同様のことが出来るかも。
省3
64(2): _gunzip 01/12/30 06:28 ID:??? AAS
>>43 50
PerlIO::TextCodecクラスみたいなのが追加されたら便利かも。
(´-`).｡ｏＯ（以下↓は妄想.....）
*------*
#!/usr/bin/perl6
use IO;
my $in = new IO::TextStream(@ARGV[0]); #Perl6の配列要素参照は@array[index]
my $out = new IO::TextStream(@ARGV[1]);
$in.open("r") or $out.open("w") or die "open() failed";
$*in is chomped; # 入力は自動的に改行を削除
$out.setCodec(PerlIO::TextCodec::euc_JP); # 出力はeuc-jpで、とか
while (!$in.end) {
my string $line = $in.readline(); # 勝手にunicode文字列に変換して$lineへ
$out.writeline($line); # $outのコーデックでunicode->euc-jp自動変換
$out << codec("euc-jp") << $line << endl; # まにぴゅれーたすたいる
print $out: $line.locale8bit(); #ロケールに応じたエンコーディングで出力
my $codec = new PerlIO::TextCodec("shiftjis");
print $out: $codec.fromUnicode($line);
}
$in.close();
$out.close();
*-----*
>>49 それは無いかなぁ
>>51-52 それはライブラリのお仕事かなぁ
65(1): _gunzip@書けるの？ 01/12/30 06:30 ID:??? AAS
>>60
Perl6では可能ですよ。詳しくは
RFC025 外部ﾘﾝｸ[html]:dev.perl.org と、
Apocalypse 3<Operators> の "multiway comparisons" の項を見てね。
外部ﾘﾝｸ:dev.perl.org
>>62
RFC26 外部ﾘﾝｸ[html]:dev.perl.org で提案され、Perl6で
取り入れられる予定です。Damian Conway氏のExegesis 2
"Take that! And that!" に実例が出てきます。
また、省略時パラメータは //= で行います。
ですから、例えばC++で(今書いてたコードから拝借)
void
QMenu::insert(const QString& text, int index = -1)
{
// なんやかや
}
をPerl6では、
sub
QMenu::insert(string $name is constant, int $index //= -1)
{
# なんやかや
}
と書けます。
66: 名無しさん＠お腹いっぱい。 01/12/30 11:50 ID:??? AAS
>>65
良くわからんけど、仮引き数は全部constになるのかな
つまり、内部的に実引き数へのポインタが@_で@_へのポインタが
仮引き数になるけど、仮引き数のプロパティはconstantになるとか何とか････
んー、結構良いけど何となく嫌 (＾ｰ＾;
Damian 氏はC++ファンなんだろうか･･･
67: 名無しさん＠お腹いっぱい。 01/12/30 16:53 ID:??? AAS
>>64
Perl5でも同じことが出来ませんか。
68: 名無しさん＠お腹いっぱい。 01/12/30 16:58 ID:??? AAS
できる。それぐらいは分かってるだろ。
69: 名無しさん＠お腹いっぱい。 01/12/30 18:00 ID:neJVFUng(1) AAS
>>64
げげ、Perl6 で配列要素の参照方法変わるんですか...
70: 名無しさん＠お腹いっぱい。 01/12/30 22:41 ID:??? AAS
標準でってことですか。失敬。
71: １＝東京kitty [ｄｄ] 01/12/30 23:25 ID:??? AAS
結構続いてるな（ぷっ
72: 名無しさん＠お腹いっぱい。 02/01/03 15:02 ID:2yvOBGYW(1) AAS
本物の匿名型グロブを返すgensym()が欲しい。
いやなんとなく。
73(1): 名無しさん＠お腹いっぱい。 02/01/03 16:00 ID:??? AAS
もうすこし精度の良い乱数が欲しい。
74: 名無しさん＠お腹いっぱい。 02/01/03 19:37 ID:??? AAS
>>73
外部ﾘﾝｸ[html]:www.math.keio.ac.jp
なんかがよさげですね。。C,C++の標準関数になればみんな幸せになりそうですが・・
75: 名無しさん＠お腹いっぱい。 [age] 02/01/17 02:17 ID:??? AAS
あげ
76: ４６９ [あえらえらえｒｙ] 02/04/21 09:11 ID:??? AAS
コテハンってウザイね。
77: 02/04/21 10:45 ID:mSKVAdKd(1) AAS
>>49
%a=(%b,%c);
じゃだめか？
78(1): [sa\x00ge] 02/04/21 16:42 ID:??? AAS
コテハンってウザイね。
79: 02/04/21 16:47 ID:??? AAS
>>78
ﾁｬﾝﾁｬﾗﾁｬﾝﾁｬﾗ
（⌒） /
（＾ ＠＾） -
（⊃⊂） ヽ
ｵｯｶｼｰ
（⌒） /
（・ ＠＾） -
○（ ⊂） ヽ
80(1): 02/04/21 17:38 ID:??? AAS
#include "perl6.h"
#include "perl6/dbi.h"
// usage: program perl-expr files
int main(int argc, char** argv){
PERL6_MAIN_BEGIN;
Perl::SV dbh = Perl::DBI::connect("dbi:foo:bar.db");
Perl::SV sth = dbh->prepare("SELECT * FROM hoge");
sth->execute();
Perl::SV row;
while(row = sth->fetchrow_arrayref){
Perl::println(Perl::join(" ", row));
}
sth->finish();
dbh->disconnect();
PERL6_MAIN_END;
return 0;
}
81(1): [ｓｈｒ] 02/04/21 18:15 ID:??? AAS
>>80
それは何？
C/C++のコードではないようだし。
82: 81 02/04/21 18:37 ID:??? AAS
C++だった。ハズカシ
83(1): ぺるにゃん 02/04/28 20:10 ID:gfGqCBjT(1) AAS
sort のお話ですにゃ。
今の Perl は、巨大な配列を sort すると、効率が悪くなります；；
@sorted = sort(@array);
@array の要素数が増えるにしたがって、処理時間が爆発します。
これは Perl の sort() 関数が、効率の悪いアルゴリズムを
使っているせいでしょうか？
かんたんな実験により、配列の要素数 を N とすると、perl の sort() 時の
比較回数はおよそ N * log N 回のオーダーという結果がでました。これは、
配列が 100 万要素だったとしても、たかだか N の２０倍程度の比較回数にすぎません。
おそらくは最高レベルの効率です。私はこれに文句をつけることはできません。
では、sort() 自体は実用じゅうぶん速いのに、
なぜ上の１行は爆発的に遅くなるのでしょうか？試しにこう書いてみました。
sort(@array);
これは@array が１００万要素を超えていても、じゅうぶん高速でした。
（当然、ボイドコンテキストなので、結果は捨てられるので、意味はありません）
ということは、巨大な配列の「複製」のために、ものすごく時間を
取られているということです。それはありうることです。
ソート結果を直接 @array に代入してしまう関数があれば、
これは解決できると思います。そういう sort関数を希望ですにゃ。
( 私は ruby 使いじゃないのですが、
ruby には、「破壊的 sort」が用意されているらしいんですねぇ・・・
さすがにゃ）
84(1): [age] 02/04/28 22:06 ID:??? AAS
switch欲しい……
サブルーチンで作ってみようと努力したが構造的に不可能だった鬱
85(2): _gunzip@訂正歓迎 [鬱だ...。] 02/04/28 22:16 ID:??? AAS
>>83
Exegesesを見る限り、destructive sortがPerl6に取り込まれる可能性はなさそう。
>>84
Perl5では、外部モジュールで。
外部ﾘﾝｸ:search.cpan.org
Perl6では、givenという名前で組み込まれる予定です。
(switchと命名されなかったのは、C/C++/Javaのswitchとは違うということを際立たせるためだそうで)
外部ﾘﾝｸ[html]:www.perl.com
用例 外部ﾘﾝｸ[html]:www.perl.com
欲張りすぎて、ちょっとわかりににくひ。（組み合わせが23通りもあるのかよ...）
86(1): 02/04/29 11:52 ID:5LS+M/ng(1/2) AAS
うるせーバカ。
初心者は黙ってろ スレのレベルが下がる
87: 02/04/29 12:30 ID:??? AAS
>>86←典型例
88: 02/04/29 12:32 ID:5LS+M/ng(2/2) AAS
＞＞８７
必死だな。誰かさん（大爆笑）
89: 02/04/29 14:52 ID:??? AAS
＞（大爆笑）
ヤフーに帰れ
90: 02/04/29 19:01 ID:NmdFgil6(1/3) AAS
＞＞８9
必死だな。誰かさん（大爆笑）
91: ロボ鉄 ◆MGTy6iYI [ここは誰かさんリレースレとなりましたw] 02/04/29 19:09 ID:??? AAS
＞＞９0
必死だな。誰かさん（大爆笑）
92: 02/04/29 19:17 ID:NmdFgil6(2/3) AAS
＞＞９1
必死だな。誰かさん（大爆笑）
93: 02/04/29 20:07 ID:??? AAS
＞＞９２
乙武必死だな（藁
94: 乙武 02/04/29 21:16 ID:??? AAS
必死で生きてますが何か？
95: 02/04/29 21:43 ID:NmdFgil6(3/3) AAS
(ﾟДﾟ)ﾊｧ? しねばぁ？
96: あぼーん [あぼーん] AAS
あぼーん
97(1): not 83 02/04/30 11:53 ID:9z6SUNiy(1) AAS
>>85
> Exegesesを見る限り、destructive sortがPerl6に取り込まれる可能性はなさそう。
そうなんですか。むむー。
せめてsortを多重定義できればいいんですがねぇ。tieのSORTでもいいですが。
それにしても新構文はかなり奇怪ですなあ。
↓かなり驚きましたよ。
if @array =~ $elem {...} # true if @array contains $elem
if $key =~ %hash {...} # true if %hash{$key}
if $value =~ (1..10) {...} # true if $value is in the list
if $value =~ ('a',/\s/,7) {...} # true if $value is eq to 'a'
# or if $value contains whitespace
# or if $value is == to 7
98(1): 02/05/01 04:48 ID:HoZj1fyx(1) AAS
標準関数よりも、標準ライブラリを充実させて欲しい
シェルもろくに使えない奴らに「複雑な設定が必要」なんて言われもない
批判を受けるのはもういやだ。
99: 02/05/01 23:31 ID:ZTriJMsX(1) AAS
女性の股を開く関数。
もしくは、チョンを殺してくれる関数。
100(2): 02/05/01 23:34 ID:??? AAS
>>98
これ以上ブクブク太らせて楽しい？
101: 02/05/02 04:25 ID:Opu6NMoF(1) AAS
>>97
しんだらぁ？
102: ぺるにゃん 02/05/03 05:12 ID:??? AAS
>>85
そうにゃんだ。残念。
でも明快なお答えをありがとう。
>>100
ぜい肉をとるために、getほにゃららっていう network 関連の関数を
モジュールに追い出すべきという意見はどうでしょう。
103: 02/05/03 13:14 ID:??? AAS
・ネットワーク関連の関数をモジュールに追い出し
・数学関数をモジュールに追い出し
・format writeはｲﾗﾈｰﾖ
104(1): 02/05/05 19:28 ID:??? AAS
いっそのこと関数全部モジュールに追い出してしまえ！
105: 02/05/05 20:11 ID:??? AAS
>>104
C言語ライクで良い感じですな。
106: 02/05/06 21:30 ID:uN5rTlAV(1) AAS
>>100
痩せすぎているので、少しは太れよってみんなから言われるよ
107: 02/05/07 20:48 ID:NQEaYM+J(1) AAS
sage
108: 02/05/08 13:20 ID:??? AAS
そういうセリフ吐く奴ってoffで合うと大概口だけいかにももててますアピールの
きもい系のヤシなんだよねｗ
109(1): 02/05/08 19:53 ID:??? AAS
/bin/grepを呼ぶのにエスケープの手間がかかるんで
ファイルからgrepする関数が欲しい。
@res = fgrep(/hoge/, /\.log$/,"/var/log/");
みたいな。
110: 02/05/08 20:18 ID:??? AAS
>>109
それこライブラリの仕事だろ。
それ以前にgrepとfgrepという全く別の関数が存在することも大いに問題だし。
どうしてもというならShell.pmでも使っとけ。
#!/bin/perl
use Shell qw(fgrep);
$ENV{PATH} = '/bin';
@res = fgrep 'hoge', '/var/log';
111: 02/06/24 20:29 ID:??? AAS
今は Time::Local があるからまあ許すが
その昔なぜ localtime が標準で実装されてて timelocal がなかったのか不思議だ。
112: 02/11/25 09:32 ID:ftkefb9E(1) AAS
Thread.pmがActivePerlでまともに使えるようになってほしい。
Perl5.8.0ではちゃんと動くのか？
113: 02/11/25 20:58 ID:??? AAS
mmapを標準関数、もしくはcore moduleでおねがいぃ
114: 02/11/27 00:59 ID:??? AAS
god("jpeg画像を120*120にリサイズする");
god("テキトーなデザインを出力する");
god("このソースが人に読まれない");
っていうのが欲しいです。
115(1): 02/12/11 10:58 ID:00jmHk8S(1) AAS
CSVファイルを扱う関数。
任意の項目によるソートとかいろいろ。
116(1): 02/12/11 22:50 ID:??? AAS
>115
DBD::CSV使えば？
117: 02/12/12 07:00 ID:??? AAS
>>116
DBIモジュールが標準モジュールになったら使うよ。
118(2): 02/12/15 16:09 ID:??? AAS
>>49
俺様の力作使ってはくれまいか？
sub merge
{
return(@_);
}
119: 02/12/16 10:19 ID:YT4sQXgY(1) AAS
↑すごいYO!
120: 02/12/16 23:14 ID:??? AAS
>>118
usage:
%c = merge ( %a, %b );
こんな感じ？
確かにシンプルだ……。
>>49は、キーがかぶった場合の仕様を作らなかったから、これでもいいと言える。
勉強になります。
121(1): 03/01/12 02:03 ID:qwhpCAH/(1) AAS
marge関数はPerl6で追加を検討しているらしい。
外部ﾘﾝｸ[htm]:allabout.co.jp
122(2): 03/01/12 17:53 ID:??? AAS
use Benchmark;
timethis(20000, sub{ -f 'index.html'});
exit;
timethis 20000: 10 wallclock secs ( 9.77 usr + 0.00 sys = 9.77 CPU) @ 2047.08/s (n=20000)
遅すぎ、、、
もっと速くしてくれ。
123(1): 03/01/12 19:13 ID:bGDRedPP(1) AAS
>>49 ＞書いても3行なんですけどね。
%c = ( %a, %b );
どこらへんに三行要るんだろう？
124(1): ぺるにゃん 03/01/12 19:22 ID:3H9ULczA(1/2) AAS
>>122
これは、
ＯＳに処理を依頼しているわけですから、
どの言語でやっても遅くなると思いますよ。
125: 122 03/01/12 19:27 ID:??? AAS
>>124
そうなのですか、、、
うぅ、残念です。
126: ぺるにゃん 03/01/12 21:03 ID:3H9ULczA(2/2) AAS
>>123
元質問のひとは、一時的にメモリにギュバーっと展開しちゃうのは
嫌なのではないでしょうか
127: 03/01/13 00:18 ID:KvjrngEn(1) AAS
Perlはじめたころ println() が欲しかった。
今でも欲すぃ
128: 03/01/13 01:32 ID:??? AAS
php() PHPが使える関数
129(1): 03/01/13 02:03 ID:/r5THG1/(1) AAS
ていうか
ネットワーク関連のいらない関数ｽﾃﾛ!
130(1): 03/01/13 05:39 ID:9OqkABMV(1) AAS
Math.max()
Math.min()
131: ◆hMJAPH9PWA 03/01/14 10:29 ID:??? AAS
5.8で標準モジュールに追加されたList::UtilとScalar::Utilは便利なんだけど、
Scalar::Utilは実装のほとんどをList::Utilに頼ってるんだから、
一緒にしてUtilityとでもすればよかったと思う。
>>121
mergeってC++のSTLにあるような関数だと思うけど。
>>129
そうだね、どうせuse Socketしないとまともに使えないんだから、
Socketモジュールに入れても混乱は少ない気がする。
132: 03/01/14 21:29 ID:??? AAS
>>130
Math.mid()はいらんのか？
133: 山崎渉 [（＾＾）sage] 03/01/15 13:33 ID:??? AAS
（＾＾）
134: 03/01/27 21:06 ID:??? AAS
Math.ave()
135: 山崎渉 [（＾＾）] 03/03/13 17:49 ID:??? AAS
（＾＾）
136: 山崎渉 [（＾＾）] 03/04/17 12:14 ID:??? AAS
（＾＾）
137(1): 山崎渉 [（＾＾）sage] 03/04/20 06:19 ID:??? AAS
∧＿∧
（ ＾＾ ）＜ ぬるぽ（＾＾）
138: 山崎渉 [（＾＾）] 03/05/22 02:20 ID:??? AAS
━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―
139: 03/05/22 22:45 ID:??? AAS
PHPのurlencode
htmlspecialchrs
nl2br
っていうか、自分でこしらえたけど
140: 03/05/25 07:07 ID:??? AAS
use CGI
141: 山崎渉 [（＾＾）] 03/05/28 17:10 ID:??? AAS
AA省
142: 山崎 渉 [（＾＾）] 03/07/15 11:24 ID:??? AAS
AA省
143(1): 山崎 渉 [（＾＾）sage] 03/08/02 02:29 ID:??? AAS
∧＿∧
（ ＾＾ ）＜ ぬるぽ（＾＾）
144: ◆3EsfZv7LPw 03/09/02 16:50 ID:??? AAS
けっとばすぞ〜
145: [age] 04/01/09 07:38 ID:??? AAS
塗る歩禁止！
146(1): 04/12/21 18:37 ID:Ctl+24VT(1) AAS
配列の要素の最大値や最小値を返す関数とか。
あったっけ。
147: 04/12/22 05:24 ID:??? AAS
今の関数使えたらなんでもいいけど
PHPの真似だけはしてほしくないね
148: 04/12/24 19:51 ID:??? AAS
>>146
List::Util
でいいじゃん。
149(2): 04/12/28 23:22 ID:??? AAS
どんな改行コードでもchompしてくれる関数。
・・・ってか、自作した。
150(1): 05/01/01 22:52 ID:??? AAS
>>149
そんな関数いらね
151(1): 05/01/02 20:00 ID:??? AAS
>>150
漏れの場合、なければ仕事にならん・・・。
152(1): 05/01/02 23:43 ID:??? AAS
>>151
いらないと言ったのは
わざわざPerl側で用意するほどの関数ではないという意味だ
153(1): 05/01/03 13:01 ID:??? AAS
>>152
なるほど
確かに簡単な処理で何とかなるが、速度面が心配でな・・・。
chompのリプレースって事ならあってもイイと思ったんだが、どうよ。
154: 05/01/05 09:38 ID:??? AAS
>>153
確かに今使ってるのよりも処理が速くなればそれに越したことはないな
ただPerl側であまり用意すると便利な反面、コードの理解力を落とすから
そのバランスだよね
155: 05/01/05 19:07 ID:??? AAS
select関数をどうにかしてほしい
156: 2005/07/20(水)19:33 ID:JCdrAQ5o(1) AAS
>>118
sub merge {}
157: 2005/07/25(月)15:46 ID:??? AAS
sub make_money {
my $chobitto = shift;
my $gossori = $chobitto ** 1000000;
return $gossori;
}
一番の問題はどうやって関数にお金を渡すかだ。
158: 2005/07/25(月)20:28 ID:??? AAS
おっさん
159: 2005/07/25(月)22:38 ID:63FLM844(1) AAS
夜のおかずになってくれる関数。
160: 2005/07/28(木)02:53 ID:??? AAS
新しく標準で欲しい関数は無いけど、
新しく標準で欲しいクラス、パッケージは沢山ある。
161(1): 2005/07/28(木)15:30 ID:??? AAS
標準で欲しい関数は無いけど、モジュールに追い出してほしい関数なら沢山ある。
ソケット・ネットワーク関連（どうせuse Socketしないとまともに使えない）
get* set* 系(getpwentなど。Windowsじゃ意味ねー。こういうものこそモジュールの仕事だろ)
フォーマット関連（おかげでwrite()が無駄に予約語に…)
セマフォ関連(これもモジュールで対応してくれ)
このくらい削ればプロセスサイズも大分小さくなって起動が早くなりそうだ。
162(4): 2005/10/11(火)04:25 ID:hXdkdtTb(1) AAS
Shift_JIS で書かれた文字列を
chomp($_ = <<'END');
こちょ♪こちょ♪
END
とせずに済む関数
163: 2005/10/12(水)02:12 ID:??? AAS
>>162
それsjisじゃなくてWindowsの仕様だぞ・・・
164: 2005/10/12(水)02:47 ID:??? AAS
>>162
できましたー。
use encoding qw(shiftjis);
# え、これと違う？
165: 2005/10/12(水)08:19 ID:??? AAS
次期PHPってParrot採用との噂は本当なん？
166: 2005/10/12(水)17:07 ID:??? AAS
その噂ってparrotが2002頃に出るって言われてた頃のだよね。
167: 2005/12/19(月)02:00 ID:??? AAS
暗号化復号化
上下前次1-新書関写板覧索設栞歴
あと 36 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.020s