June 2018 Update
This commit is contained in:
parent
ba8067c3b7
commit
22f33d4004
5278 changed files with 84726 additions and 14379 deletions
7
Task/Echo-server/Perl-6/echo-server-2.pl6
Normal file
7
Task/Echo-server/Perl-6/echo-server-2.pl6
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
react {
|
||||
whenever IO::Socket::Async.listen('0.0.0.0', 12321) -> $conn {
|
||||
whenever $conn.Supply.lines -> $line {
|
||||
$conn.print( "$line\n" ) ;
|
||||
}
|
||||
}
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue