@results = $telnet->cmd("perl -ne \"print if /\\b$oldDBUser/i ||/\\b$oldDBPass/i \" $ubbFile");
print "\n\n@results \n";