Use of uninitialized value $3 in concatenation (.) or string at perlmonks_700143.pl line 8.