Use of uninitialized value $foo in concatenation (.) or string at - line 6. testing