Perl 6: A nice supplies: syntactic relief for working with asynchronous data

Really like how expressive this solution is and the readability of the "whenever" blocks handling asynchronous events.