X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FBit%2FMorseSignals.pm;h=3add7d6bffdd2892315ae93902fb08714e62b71a;hb=6c12cf18cfcc66909ded5faef68b89d79bbe9c39;hp=a8d13f6faa85c191c537a6f7f19d2030ab61ed06;hpb=ed888890547450e75030085fadb958c5ea2a6421;p=perl%2Fmodules%2FBit-MorseSignals.git diff --git a/lib/Bit/MorseSignals.pm b/lib/Bit/MorseSignals.pm index a8d13f6..3add7d6 100644 --- 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.05 =cut -our $VERSION = '0.02'; +our $VERSION = '0.05'; + +=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" }; + + $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 is a base class for emitters ; -=item L is a base class for receivers ; +=item L is a base class for receivers. =back @@ -114,7 +125,7 @@ L, L. =head1 AUTHOR -Vincent Pit, C<< >> +Vincent Pit, C<< >>, L. You can contact me by mail or on #perl @ FreeNode (vincent or Prof_Vince).