X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FBit%2FMorseSignals.pm;h=fa97151500a770baf65226494827396617ba2e52;hb=a6066756b2f156893cc18bb33c4f55af672c588b;hp=2f5b1676102c7c351d1acb6ca63c2289bcea3b7c;hpb=0288f57c6aaf2cb133df80f13d78af66ea094902;p=perl%2Fmodules%2FBit-MorseSignals.git diff --git a/lib/Bit/MorseSignals.pm b/lib/Bit/MorseSignals.pm index 2f5b167..fa97151 100644 --- a/lib/Bit/MorseSignals.pm +++ b/lib/Bit/MorseSignals.pm @@ -9,19 +9,19 @@ Bit::MorseSignals - The MorseSignals protocol. =head1 VERSION -Version 0.04 +Version 0.08 =cut -our $VERSION = '0.04'; +our $VERSION = '0.08'; =head1 SYNOPSIS use Bit::MorseSignals::Emitter; use Bit::MorseSignals::Receiver; - my $deuce = new Bit::MorseSignals::Emitter; - my $pants = new Bit::MorseSignals::Receiver done => sub { print $_[1], "\n" }; + 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); @@ -36,7 +36,7 @@ An actual implementation is also provided : =item L is a base class for emitters ; -=item L is a base class for receivers ; +=item L is a base class for receivers. =back @@ -106,11 +106,11 @@ The constants L, L, L and L; our @EXPORT = (); our %EXPORT_TAGS = ( - 'consts' => [ qw/BM_DATA_AUTO BM_DATA_PLAIN BM_DATA_UTF8 BM_DATA_STORABLE/ ] + 'consts' => [ qw ] ); our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS; $EXPORT_TAGS{'all'} = [ @EXPORT_OK ]; @@ -127,7 +127,7 @@ L, L. Vincent Pit, C<< >>, L. -You can contact me by mail or on #perl @ FreeNode (vincent or Prof_Vince). +You can contact me by mail or on C (vincent). =head1 BUGS @@ -139,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. + =head1 COPYRIGHT & LICENSE Copyright 2008 Vincent Pit, all rights reserved.