多言語でforループを列挙していくスレ

[0055 デフォルトの名無しさん 2018/11/07(水) 00:54:48.89 ID:T8AyQ5+v]

Perl5

use feature 'current_sub';
use constant N => 100;
sub {
goto __SUB__ if shift;
}->(1..N);

※perlのgoto 関数はcontinuationなので上記codeは最適化tail recursionによる繰り返しと同じ