perlの「until」ループ文

質問

こんにちは。以下のループ文ですが、

---
print "初期値を入力してください：\n";
$number = <STDIN>;
chomp($number);

until ($number > 16) {
print "数値：$number\n";
$number += $number;
}
---

実行画面で「２」を入力すると、

数値：2
数値：4
数値：8
数値：16

のように出力されます。
なぜでしょうか？2,3,4....16じゃないの？

どなたか、教えてください。よろしくお願いします。

回答No.1

MovingWalk · ベストアンサー

$number += $number; は　$number = $number+$number; 　ですから

1回目　2
2回目　2+2=4
3回目　4+4=8
4回目　8+8=16

でいいんじゃないでしょうか。
ひょっとして、$number++;　と混同していませんか？

お礼

どうもありがとうございます。

＞ひょっとして、$number++;　と混同していませんか？
→おっしゃる通りです。インクリメントと混同していました。

回答No.2

mneko

$number += $number此処で２，４，８になってしまいます

上の式は

$number = $number + $number

という意味で、$number　内のデータに　$number　を

加算しています。

お礼

ご指導いただき、どうもありがとうございます。
良く分かりました。