if($line =~ /^([A-Za-z0-9_-()]+)\d+/) {