more 6ish

Raku · Apr 16, 2015 · e0eda16 · e0eda16
1 parent ece01d9
commit e0eda16
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/categories/cookbook/17sockets/17-01tcp_client.pl b/categories/cookbook/17sockets/17-01tcp_client.pl
@@ -10,7 +10,7 @@ =head1 Writing a TCP Client
 my $s = IO::Socket::INET.new( :host<www.perl6.org>, :port(80) );
 $s.send( "HEAD / HTTP/1.0\n\n" );
 
-while ( my $r = $s.get ) {
+while my $r = $s.get {
     say $r;
 }
 

diff --git a/categories/cookbook/17sockets/17-02tcp_server.pl b/categories/cookbook/17sockets/17-02tcp_server.pl
@@ -10,7 +10,7 @@ =head1 Writing a TCP Server
 my $s = IO::Socket::INET.new( :localport(1024), :type(1), :reuse(1), 
                               :listen(10));
 
-while ( my $c = $s.accept() ) {
+while my $c = $s.accept()  {
     say $c.get;
 }