Perlについての質問箱 65箱目

**デフォルトの名無しさん** · 2024/04/16(火) 14:14:10.10

print"A\n",print"B\n";

これの動き教えてくれよ
出来ればサンプルソースも

**デフォルトの名無しさん** · 2024/04/16(火) 15:16:06.51

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");

**デフォルトの名無しさん** · 2024/04/16(火) 15:37:42.78

成る程、() 使わない副作用意識しないとダメですね
ありがとうございます

**デフォルトの名無しさん** · 2024/11/17(日) 20:01:50.35

poetryと同等の仕組みがないときつい

**デフォルトの名無しさん** · 2025/11/10(月) 07:57:26.71

2025年最後の書き込みになるかもしれないから書いておこう

**デフォルトの名無しさん** · 2025/11/16(日) 00:05:37.18

いや、この書き込みが2025年最後だ

という書き込みが延々と続いたりして

**デフォルトの名無しさん** · 2025/11/24(月) 22:48:34.34

とは続かないのがかなしい