[warning : variable $companyid does not exist in command 'EVAL:$THIS.companyid =~ s/\D//g;']