better pluck examples

mojolicious · Jul 7, 2012 · e6c0ff8 · e6c0ff8
1 parent 58e196d
commit e6c0ff8
Show file tree

Hide file tree

Showing 8 changed files with 14 additions and 9 deletions.
diff --git a/Changes b/Changes
@@ -1,4 +1,7 @@
 
+3.05  2012-07-07
+  - Improved documentation.
+
 3.04  2012-07-07
   - Improved Mojo::IOLoop performance by reducing stream timeout precision
     from 0.025 to 0.5 seconds.

diff --git a/examples/microhttpd.pl b/examples/microhttpd.pl
@@ -41,7 +41,7 @@
 print <<'EOF';
 Starting server on port 3000.
 Try something like "ab -c 30 -n 100000 -k http://127.0.0.1:3000/" for testing.
-On a MacBook Pro 13" this results in about 15k req/s.
+On a MacBook Pro 13" this results in about 16k req/s.
 EOF
 
 # Start loop

diff --git a/lib/Mojo/DOM.pm b/lib/Mojo/DOM.pm
@@ -564,7 +564,7 @@ selectors from L<Mojo::DOM::CSS> are supported.
   my $id = $dom->find('div')->[23]{id};
 
   # Extract information from multiple elements
-  my @headers = $dom->find('h1, h2, h3')->map(sub { shift->text })->each;
+  my @headers = $dom->find('h1, h2, h3')->pluck('text')->each;
 
 =head2 C<namespace>
 
@@ -725,7 +725,7 @@ L<Mojo::Collection> object, depending on number of children.
 
   say $dom->p->text;
   say $dom->div->[23]->text;
-  $dom->div->each(sub { say $_->text });
+  say $dom->div->pluck('text');
 
 =head1 ELEMENT ATTRIBUTES
 

diff --git a/lib/Mojo/IOLoop/Stream.pm b/lib/Mojo/IOLoop/Stream.pm
@@ -56,7 +56,7 @@ sub start {
   $self->{timer} ||= $reactor->recurring(
     0.5 => sub {
       return unless $self && (my $t = $self->timeout);
-      $self->emit_safe('timeout')->close if (time - ($self->{active})) >= $t;
+      $self->emit_safe('timeout')->close if (time - $self->{active}) >= $t;
     }
   );
 

diff --git a/lib/Mojo/Loader.pm b/lib/Mojo/Loader.pm
@@ -130,6 +130,8 @@ following new ones.
 
 Extract embedded file from the C<DATA> section of a class.
 
+  say for keys %{$loader->data('Foo::Bar')};
+
 =head2 C<load>
 
   my $e = $loader->load('Foo::Bar');

diff --git a/lib/Mojo/Message.pm b/lib/Mojo/Message.pm
@@ -632,11 +632,11 @@ Turns message body into a L<Mojo::DOM> object and takes an optional selector
 to perform a C<find> on it right away, which returns a collection.
 
   # Perform "find" right away
-  $message->dom('h1, h2, h3')->pluck('text')->join("\n")->say;
+  say $message->dom('h1, h2, h3')->pluck('text');
 
   # Use everything else Mojo::DOM has to offer
   say $message->dom->at('title')->text;
-  $message->dom->html->body->children->pluck('type')->join("\n")->say;
+  say $message->dom->html->body->children->pluck('type')->uniq;
 
 =head2 C<error>
 

diff --git a/lib/Mojo/UserAgent.pm b/lib/Mojo/UserAgent.pm
@@ -548,8 +548,8 @@ Mojo::UserAgent - Non-blocking I/O HTTP 1.1 and WebSocket user agent
   say $ua->get('mojolicio.us')->res->dom->html->head->title->text;
 
   # Scrape the latest headlines from a news site
-  $ua->max_redirects(5)->get('www.reddit.com/r/perl/')
-    ->res->dom('p.title > a.title')->pluck('text')->join("\n")->say;
+  say $ua->max_redirects(5)->get('www.reddit.com/r/perl/')
+    ->res->dom('p.title > a.title')->pluck('text')->shuffle;
 
   # IPv6 PUT request with content
   my $tx

diff --git a/lib/Mojolicious.pm b/lib/Mojolicious.pm
@@ -34,7 +34,7 @@ has static   => sub { Mojolicious::Static->new };
 has types    => sub { Mojolicious::Types->new };
 
 our $CODENAME = 'Rainbow';
-our $VERSION  = '3.04';
+our $VERSION  = '3.05';
 
 # "These old doomsday devices are dangerously unstable.
 #  I'll rest easier not knowing where they are."