X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FIPC%2FMorseSignals%2FReceiver.pm;h=b14b6769ff1dca2bb643e3e3005d4d604ed8b328;hb=0b4f6d24128d9d60c3f8a5010e43bdfd9de7b655;hp=03d1945d92e96462711e11c875a43da5aaedbb89;hpb=9370c8d2ab07f434272dbbddb92bdd5d8d1fe3af;p=perl%2Fmodules%2FIPC-MorseSignals.git diff --git a/lib/IPC/MorseSignals/Receiver.pm b/lib/IPC/MorseSignals/Receiver.pm index 03d1945..b14b676 100644 --- a/lib/IPC/MorseSignals/Receiver.pm +++ b/lib/IPC/MorseSignals/Receiver.pm @@ -25,9 +25,9 @@ our $VERSION = '0.15'; use IPC::MorseSignals::Receiver; local %SIG; - my $pants = new IPC::MorseSignals::Receiver \%SIG, done => sub { + my $pants = IPC::MorseSignals::Receiver->new(\%SIG, done => sub { print STDERR "GOT $_[1]\n"; - }; + }); =head1 DESCRIPTION @@ -80,7 +80,7 @@ For truly useful IPC, search for shared memory, pipes and semaphores. 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