Permalink
Fetching contributors…
Cannot retrieve contributors at this time
6 lines (5 sloc) 138 Bytes
my $sock = IO::Socket::INET.new( localport => 9999, :listen );
while $sock.accept -> $new {
say "<< $new.get() >>";
$new.close;
}