[ic] [interchange] Fix potential "use of uninitialized value" if called during startup

Peter peter at pajamian.dhs.org
Fri Jun 23 09:36:04 UTC 2017


On 23/06/17 21:34, Peter wrote:
> On 23/06/17 19:20, Stefan Hornburg (Racke) wrote:
>>
>> Hallo David,
>>
>> thanks very much on your effort to clean up Interchange!
>>
>> I think the // operator isn't present in older Perls.
>>
>>> +		$pat = $Global::AllowedFileRegex->{$Vend::Cat // ''}
> 
> Good catch, yeah, it needs to be changed to:
> $pat = $Global::AllowedFileRegex->{defined $Vend::Cat ? $Vend::Cat : ''}

...or in this case you could probably just use || instead of //.


Peter



More information about the interchange-users mailing list