X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FObject%2FTap.pm;h=74f28031d913803b5fc25b85b79cd6ad77900cdc;hb=c9c985cf6239f2e8a647b8eb20232cddd1ca5448;hp=ae6c11c0cb3370011a5bc4ec8fc751d484b7bc17;hpb=94a74d32baf65ae00809755db4a3a9690e450a78;p=p5sagit%2FObject-Tap.git

diff --git a/lib/Object/Tap.pm b/lib/Object/Tap.pm
index ae6c11c..74f2803 100644
--- a/lib/Object/Tap.pm
+++ b/lib/Object/Tap.pm
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 use base qw(Exporter);
 
-our $VERSION = '1.000001'; # 1.0.1
+our $VERSION = '1.000005';
 
 our @EXPORT = qw($_tap);
 
@@ -40,10 +40,15 @@ You can also pass extra args -
 
   $obj->$_tap(sub { warn "Got arg: $_[1]" }, 'arg');
 
-or use a method name instead of a sub name -
+or use a method name instead of a sub ref -
 
   my $thing = My::Class->new(...)->$_tap(set_foo => 1);
 
+For a 'real' example of how that might be used, one could create and
+initialize an L<HTML::TableExtract> object in one go using -
+
+  my $te = HTML::TableExtract->new->$_tap(parse => $html);
+
 =head1 AUTHOR
 
 mst - Matt S. Trout (cpan:MSTROUT) <mst@shadowcat.co.uk>