- my $pants = Bit::MorseSignals::Receiver->new(done => sub { print $_[1], "\n" });
+ my $pants = Bit::MorseSignals::Receiver->new(
+ done => sub { print $_[1], "\n" },
+ );
$deuce->post('HLAGH') for 1 .. 3;
$pants->push while defined ($_ = $deuce->pop);
$deuce->post('HLAGH') for 1 .. 3;
$pants->push while defined ($_ = $deuce->pop);
@@ -34,9+36,13 @@ An actual implementation is also provided :
=over 4
=over 4
-=item L<Bit::MorseSignals::Emitter> is a base class for emitters ;
+=item *
-=item L<Bit::MorseSignals::Receiver> is a base class for receivers.
+L<Bit::MorseSignals::Emitter> is a base class for emitters ;
+
+=item *
+
+L<Bit::MorseSignals::Receiver> is a base class for receivers.
=back
=back
@@ -50,9+56,13 @@ The header is composed of three bits (lowest weight coming first) :
=over 4
=over 4
-=item - The 2 first ones denote the data type : a value of 0 is used for a plain string, 1 for an UTF-8 encoded string, and 2 for a L<Storable> object. See also the L</CONSTANTS> section ;
+=item *
+
+The 2 first ones denote the data type : a value of 0 is used for a plain string, 1 for an UTF-8 encoded string, and 2 for a L<Storable> object. See also the L</CONSTANTS> section ;
-=item - The third one is reserved. For compatibility reasons, the receiver should for now enforce the message data type to plain when this bit is lit.
+=item *
+
+The third one is reserved. For compatibility reasons, the receiver should for now enforce the message data type to plain when this bit is lit.
=back
=back
@@ -60,9+70,13 @@ The emitter computes then the longuest sequence of successives 0 (say, m) and 1
=over 4
=over 4
-=item - If m > n, we take n+1 times 1 followed by one 0 ;
+=item *
+
+If m > n, we take n+1 times 1 followed by one 0 ;
+
+=item *
-=item - Otherwise, we take m+1 times 0 followed by one 1.
+Otherwise, we take m+1 times 0 followed by one 1.