X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FBit-MorseSignals.git;a=blobdiff_plain;f=lib%2FBit%2FMorseSignals%2FReceiver.pm;h=be6458e1fc398f0ba7ca0f92272aa7bd27c8ba57;hp=1eb7befe980215f25a39526ba1335299e42c68ce;hb=7311d27d4099d8c1f0e011db45d53a21853ff703;hpb=35563d8644a10b1ac4a4434e000708abb9c5f476 diff --git a/lib/Bit/MorseSignals/Receiver.pm b/lib/Bit/MorseSignals/Receiver.pm index 1eb7bef..be6458e 100644 --- a/lib/Bit/MorseSignals/Receiver.pm +++ b/lib/Bit/MorseSignals/Receiver.pm @@ -25,7 +25,9 @@ our $VERSION = '0.08'; use Bit::MorseSignals::Receiver; - my $pants = Bit::MorseSignals::Receiver->new(done => sub { print "received $_[1]!\n" }); + my $pants = Bit::MorseSignals::Receiver->new( + done => sub { print "received $_[1]!\n" }, + ); while (...) { my $bit = comes_from_somewhere_lets_say_signals(); $pants->push($bit);