Pulling multiple Dr# from same field

I am trying to pull the dr numbers from all dr fields and and comparing them to a table to kill or continue. How do i pull the number from a dr field if their are multiple drs seperated by the ~. Below is my code.

switch -exact [lindex $fldList 0] {

  PD1 {

      if { [llength $fldList] >= [expr $PrimaryPos + 1] } {

      set repList [split [lindex $fldList $PrimaryPos] $repSep]

           set value  [split [lindex $repList 0] $subSep]            

set PrimaryPosVal [tbllookup $table $PrimaryPos]

But when i do the echo on my replist i get 9999^BILL^COSBY^^^MD 1111^MARLEY^BOB^^^MD, which is want (i think), so when i split it out again i get the 9999 BILL COSBY {} {} MD, but not the second dr. How would i get the second dr and then pull out the number? Any help is appreciated.