[perl] Object::Generator の yield が面白い - tokuhirom's blog

[perl] Object::Generator の yield が面白い - tokuhirom's blog

http://blogs.perl.org/users/joel_berger/2013/07/a-generator-object-for-perl-5.html Coro をつかっ...概要を表示 http://blogs.perl.org/users/joel_berger/2013/07/a-generator-object-for-perl-5.html Coro をつかってイテレータを簡単に実装できるようにしているのがオツですな。 use strict; use warnings; use Generator::Object; my $gen = generator { my $x = 0; while (1) { $x += 2; $_->yield($x); } }; print $gen->next; # 2 print $gen->next; # 4

• perl