#!/usr/bin/env perl6
use v6;

for (0..1000) {
    my $channel = Channel.new;
    $channel.close;
    my $result = (try $channel.receive) // buf8;
    say "Result is undefined" unless $result.defined;
}