X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FIPC-MorseSignals.git;a=blobdiff_plain;f=lib%2FIPC%2FMorseSignals%2FReceiver.pm;h=e5d1a150107fa6b37059de39eb34ce6ca94d8055;hp=a72eec7472c7f70b2e1cbe51122463ca11b7d5a9;hb=c6671a5ed11b430ee6fd63c40102d9981a75b3a4;hpb=21ecaad0abc3afdc379efa498a0fdad4ff0e2000 diff --git a/lib/IPC/MorseSignals/Receiver.pm b/lib/IPC/MorseSignals/Receiver.pm index a72eec7..e5d1a15 100644 --- a/lib/IPC/MorseSignals/Receiver.pm +++ b/lib/IPC/MorseSignals/Receiver.pm @@ -3,10 +3,10 @@ package IPC::MorseSignals::Receiver; use strict; use warnings; -use Carp qw/croak/; +use Carp qw; use Bit::MorseSignals::Receiver; -use base qw/Bit::MorseSignals::Receiver/; +use base qw; =head1 NAME @@ -14,11 +14,17 @@ IPC::MorseSignals::Receiver - Base class for IPC::MorseSignals receivers. =head1 VERSION -Version 0.16 +Version 0.17 =cut -our $VERSION = '0.16'; +our $VERSION = '0.17'; + +=head1 WARNING + +Due to the POSIX signals specification (which I wasn't aware of at the time I wrote this module), this module is by nature completely unreliable and will never work properly. +It is therefore B. +Please don't use it (if you were actually crazy enough to use it). =head1 SYNOPSIS @@ -31,7 +37,7 @@ our $VERSION = '0.16'; =head1 DESCRIPTION -This module installs C<$SIG{qw/USR1 USR2/}> handlers and forwards the bits received to an underlying L receiver. +This module installs C<< $SIG{qw} >> handlers and forwards the bits received to an underlying L receiver. =head1 METHODS @@ -51,7 +57,7 @@ sub new { croak 'The first argument must be a hash reference to the %SIG hash' unless $sig and ref $sig eq 'HASH'; my $self = bless $class->SUPER::new(@_), $class; - @{$sig}{qw/USR1 USR2/} = (sub { $self->push(0) }, sub { $self->push(1) }); + @{$sig}{qw} = (sub { $self->push(0) }, sub { $self->push(1) }); return $self; } @@ -98,7 +104,7 @@ You can find documentation for this module with the perldoc command. =head1 COPYRIGHT & LICENSE -Copyright 2007,2008,2013 Vincent Pit, all rights reserved. +Copyright 2007,2008,2013,2017 Vincent Pit, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.