Perlについての質問箱 65箱目 (112ﾚｽ)
上下前次1-新
102: 2023/06/08(木)00:48 ID:ZzDLFGD7(1) AAS
myのスコープはブロック、ファイル、evalの３つ
パッケージとは無関係だから>>99ではファイルスコープになるね
package P2でもう一度my $bb宣言したらエラーになることからも分かる
103: 2024/02/23(金)07:50 ID:3WpPBYhb(1) AAS
あげ
104(1): 2024/04/14(日)21:35 ID:byNUCOGR(1) AAS
ローカルサーバーでsrandとrandで生成した乱数の値と
レンタルサーバーでsrandとrandで生成した乱数の値が違うのは何で？
どちらもsrandの値は同じとする。
105: 2024/04/15(月)00:21 ID:9X9lvy+w(1) AAS
このへんから探ってみては
外部ﾘﾝｸ:github.com
煽りじゃないよ しんどいので俺はここまで
106: 2024/04/15(月)12:41 ID:cLz3iDP/(1) AAS
プラットフォームのifdefで切り分けてそうだからそれっぽいマクロ定数でも探すといいかも
107: 2024/04/15(月)17:29 ID:UgC/I+2W(1) AAS
ビルドされた環境のCライブラリ依存じゃない？
同じにしたいならMath::Random::MTとか使えばいいんでね
108: 2024/04/16(火)09:32 ID:Fr3sHPgG(1) AAS
>>104
一般論としてPerlの内部実装は無保証でコロッコロ変わるので、疑似乱数の再現性を担保したいならコードを同梱してしまうのが最も確実
cでたったこれだけ、Perlで詰めれば20行も要らんだろう、局所使用ならファイル内subでいいレベル
github.com/bmurray7/mersenne-twister-examples/blob/master/c-mersenne-twister.c
同階層にpl版もある
丁寧にコードされパッケ化で無意味に冗長なので参考ならこっち
アルゴリズム特許あるか知らんし、ライセンスを許容するなら同梱
109: 2024/04/16(火)14:14 ID:ipSHedtl(1) AAS
print"A\n",print"B\n";
これの動き教えてくれよ
出来ればサンプルソースも
110: 2024/04/16(火)15:16 ID:UEoqQOMp(1) AAS
print "A\n", print "B\n";
print("A\n", print("B\n"));
まず最初のprintの引数中のprint("B\n")が評価され"B\n"が出力される
print("B\n")が成功したので真の値1を帰す
print("A\n", 1)となる
B
A
1と表示される
print "X\n", 3 > 0;
print "X\n", 3 < 0;
print "X\n", open(my $fh, "no_such_file.txt");
111: 2024/04/16(火)15:37 ID:E/T1RXIg(1) AAS
成る程、() 使わない副作用意識しないとダメですね
ありがとうございます
112: 2024/11/17(日)20:01 ID:w8x6IOGf(1) AAS
poetryと同等の仕組みがないときつい
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.550s*