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

diff --git a/lib/Object/Tap.pm b/lib/Object/Tap.pm
index bebffc6..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.000002'; # 1.0.2
+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>