成らぬは人の為さぬなりけり

エンジニアライフをエンジョイする為のブログ

Perl

Perl勉強日誌 - FizzBuzz

Perlを勉強し始めたので、 現状の知識でFizzBuzzってみます。 PerlでFizzBuzz use 5.012; my @fizz = qw/Fizz/; my @buzz = qw/Buzz/; foreach (1..100) { say ("$fizz[$_%3]"."$buzz[$_%5]" || $_); } 実行結果 1 2 Fizz 4 Buzz Fizz 7 8 Fizz Buzz 11 Fizz…

Perl勉強日誌 - スマートマッチ

お久しぶりです。 しばらくブログ書いてませんでした。 (単純にさぼってました。。。orz)諸事情ありまして、Perlを勉強し始めたので、 ログを残して行きたいと思います。 環境 MacOSX 10.8.3 Perl 5.19.0 perlbrew 0.64 追記 スマートマッチは現在非推奨だ…