【激突】関数型言語 VS オブジェクト指向言語2at TECH【激突】関数型言語 VS オブジェクト指向言語2 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト328:デフォルトの名無しさん 12/04/14 03:25:52.86 >>326 sub com { my ($mod, $zz, $num, $str) = @_; $str .= $zz if 0 == $num % $mod; $str ? ($num, $str) : $num } sub fizz {com(3, 'Fizz', @_)} sub buzz {com(5, 'Buzz', @_)} sub gizz {com(7, 'Gizz', @_)} map {print gizz(buzz(fizz($_))) . "n"} qw(1 3 5 7 15 21 35 105); 329:デフォルトの名無しさん 12/04/14 03:27:01.29 ﾆﾔﾆﾔ 330:デフォルトの名無しさん 12/04/14 03:27:10.20 Perlは醜いラクダどころか白鳥だったのか 他の言語の立場がないな 331:デフォルトの名無しさん 12/04/14 03:27:54.81 >>328 しくった。 "n" → "\n" 332:デフォルトの名無しさん 12/04/14 03:38:24.58 天然？ 333:デフォルトの名無しさん 12/04/14 03:41:23.69 いや、ｺﾋﾟﾍﾟミスｗ 334:デフォルトの名無しさん 12/04/14 03:43:40.92 多数値の返り値の、主値かそれ以外か、を使う手があるわけか 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch