p6.p6

my @servers = %( :host<irc.freenode.net>, :6667port, :promise(''), :sock(''), :!q ),
              %( :host<localhost>,   :4444port, :promise(''), :sock(''), :!q );

CONNECTION: for @servers -> $s {
    $s<sock> = '';
    say "Starting $s<host>";
    $s<promise> = IO::Socket::Async.connect(|$s<host port>).then: {
        say "$s<host>: $_.result()";
        if .status ~~ Broken {
            dd "ZOMFG! Can't connect!";
            sleep ++$;
            redo CONNECTION;
        }

        $s<sock> = .result;
        react {
            whenever $s<sock>.Supply {
                say "Got stuff! $_";
            }
        }
        $s<q> or redo CONNECTION;
        say "Bah! $s<host>";
    };
}

await Promise.allof: @servers».<promise>;