fix Use of uninitialized value $type in concatenation