[ic] [interchange] Fix redundant sprintf errors in perl 5.22.0

[David Christensen]

> On Jun 25, 2017, at 1:13 PM, Peter <peter at pajamian.dhs.org> wrote:
> 
> On 25/06/17 10:23, Peter wrote:
>>> syntax error at /home/demo4/interchange/lib/Vend/Util.pm line 96, near "qw(redundant) if"
>> 
>> Reading perl docs it looks like this is implemented at compilation time
>> so run time constructs don't work.  Try this instead:
>> 
>> no if $^V ge v5.22.0, warnings => qw(redundant);
>> 
>> The above does not kick back any errors or warnings on 5.16.0.
> 
> I pushed this change out, we'll see if it fixes the issue.

Been out for a week, but I assume by the silence that this fixed the issue.  Sidebar, while functional, that is a very funky construct for conditional compile-time operations! :-)

David
--
David Christensen
End Point Corporation
david at endpoint.com
785-727-1171