[go: up one dir, main page]
More Web Proxy on the site http://driver.im/

タグ

Perlとfizzbuzzに関するlesamoureusesのブックマーク (1)

  • 以下のperlのコードが動かない理由を教えて下さい。…

    以下のperlのコードが動かない理由を教えて下さい。 FizzBuzzのコードなのですが、$iが11,26,41,56,71,86の時にBuzzと出力されてしまいます。 なんとなく直前のループ時の$outの内容が引き継がれている気がしますが、理由がわかりません。 --- #!/usr/bin/perl use strict; use warnings; use Perl6::Say; foreach my $i (1..100) { my $out = "Fizz" if $i%3 == 0; $out .= "Buzz" if $i%5 == 0; say $out || $i; } --- なお$outの宣言を別にしたところ、正常に動作しています。 --- foreach my $i (1..100) { my $out; $out = "Fizz" if $i%3 == 0; $ou

    lesamoureuses
    lesamoureuses 2009/08/30
    質問者の人が色々深い所まで追ってくれたおかげで色々勉強になるなぁ
  • 1