Re: getting: Illegal octal digit '8'

Thomas J Pinkl writes:
> I've just started using IPC::DirQueue 0.08.  Thanks to the author(s) 
> for a module that appears to deliver exactly what I need. 

You're welcome! ;)

> I received these warnings: 
> 
>   Illegal octal digit '8' ignored at \
>       /usr/lib/perl5/site_perl/5.6.1/IPC/DirQueue.pm line 146.
>   Illegal octal digit '8' ignored at \
>       /usr/lib/perl5/site_perl/5.6.1/IPC/DirQueue.pm line 148.
> 
> which corresponds to this section of code: 
> 
>   $self->{data_file_mode} ||= '0666';
>   $self->{data_file_mode} = oct ($self->{data_file_mode});
>   $self->{queue_file_mode} ||= '0666';
>   $self->{queue_file_mode} = oct ($self->{queue_file_mode});
> 
> in sub new().  Lines 146 and 148 are the ones that use 'oct'.

Are you providing values for data_file_mode or queue_file_mode in
the constructor?

It's worth noting that they should be formatted as octal-formatted
*strings*, not numbers.  e.g. '0666', not 0666.  Could that be it?

--j.

> The fix would appear to be:
> 
>   146:  $self->{data_file_mode} = oct sprintf "0%o",$self->{data_file_mode};
> 
>   148:  $self->{queue_file_mode} = oct sprintf "0%o",$self->{queue_file_mode};
> 
> Can anyone else confirm this?
> 
> --
> Thomas J. Pinkl                     |  T: 215-442-9300
> Senior Systems Architect            |     800-444-1427
> Health Business Systems, Inc        |  F: 215-442-7555
> An SXC Company                      |  
> 738 Louis Drive                     |  http://www.hbsrx.com/
> Warminster, PA 18974                |  http://www.sxc.com/