Switch to qw<>

[perl/modules/Bit-MorseSignals.git] / lib / Bit / MorseSignals.pm

diff --git a/lib/Bit/MorseSignals.pm b/lib/Bit/MorseSignals.pm
index a8d13f6faa85c191c537a6f7f19d2030ab61ed06..5866e6cbcd93a93e267cc5e90b633f9fdd559670 100644 (file)
--- a/lib/Bit/MorseSignals.pm
+++ b/lib/Bit/MorseSignals.pm
@@ -9,11 +9,22 @@ Bit::MorseSignals - The MorseSignals protocol.
 
 =head1 VERSION
 
-Version 0.02
+Version 0.06
 
 =cut
 
-our $VERSION = '0.02';
+our $VERSION = '0.06';
+
+=head1 SYNOPSIS
+
+    use Bit::MorseSignals::Emitter;
+    use Bit::MorseSignals::Receiver;
+
+    my $deuce = Bit::MorseSignals::Emitter->new;
+    my $pants = Bit::MorseSignals::Receiver->new(done => sub { print $_[1], "\n" });
+
+    $deuce->post('HLAGH') for 1 .. 3;
+    $pants->push while defined ($_ = $deuce->pop);
 
 =head1 DESCRIPTION
 
@@ -25,7 +36,7 @@ An actual implementation is also provided :
 
 =item L<Bit::MorseSignals::Emitter> is a base class for emitters ;
 
-=item L<Bit::MorseSignals::Receiver> is a base class for receivers ;
+=item L<Bit::MorseSignals::Receiver> is a base class for receivers.
 
 =back
 
@@ -95,11 +106,11 @@ The constants L</BM_DATA_AUTO>, L</BM_DATA_PLAIN>, L</BM_DATA_UTF8> and L</BM_DA
 
 =cut
 
-use base qw/Exporter/;
+use base qw<Exporter>;
 
 our @EXPORT         = ();
 our %EXPORT_TAGS    = (
- 'consts' => [ qw/BM_DATA_AUTO BM_DATA_PLAIN BM_DATA_UTF8 BM_DATA_STORABLE/ ]
+ 'consts' => [ qw<BM_DATA_AUTO BM_DATA_PLAIN BM_DATA_UTF8 BM_DATA_STORABLE> ]
 );
 our @EXPORT_OK      = map { @$_ } values %EXPORT_TAGS;
 $EXPORT_TAGS{'all'} = [ @EXPORT_OK ];
@@ -114,9 +125,9 @@ L<Bit::MorseSignals::Emitter>, L<Bit::MorseSignals::Receiver>.
 
 =head1 AUTHOR
 
-Vincent Pit, C<< <perl at profvince.com> >>
+Vincent Pit, C<< <perl at profvince.com> >>, L<http://www.profvince.com>.
 
-You can contact me by mail or on #perl @ FreeNode (vincent or Prof_Vince).
+You can contact me by mail or on C<irc.perl.org> (vincent).
 
 =head1 BUGS
 
@@ -128,6 +139,8 @@ You can find documentation for this module with the perldoc command.
 
     perldoc Bit::MorseSignals
 
+Tests code coverage report is available at L<http://www.profvince.com/perl/cover/Bit-MorseSignals>.
+
 =head1 COPYRIGHT & LICENSE
 
 Copyright 2008 Vincent Pit, all rights reserved.