Hi mojo people. I've started Promises with DSL syntax. How do you find
this experiment?
https://github.com/alexbyk/perl-promises6#promises6
promise {
my ($resolve, $reject, $progress) = @_;
$resolve->(promise_me(5));
then sub($v) { say "fulfilled: $v" };
when_progress { say "progress $_[0]" };
when_rejected { say "rejected $_[0]" };
then sub { }, sub { }, sub { };
when_ok {
my $val = shift;
print "Fulfilled with $val";
};
};
--
You received this message because you are subscribed to the Google Groups
"Mojolicious" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To post to this group, send email to [email protected].
Visit this group at http://groups.google.com/group/mojolicious.
For more options, visit https://groups.google.com/d/optout.