/.*/ #### ($name, $num1, $num2, $num3)= /^([^:]*?)\s+:\s+(\d+)\s+\((\d+)\s+(\d+)\)/; #### ($name)= /^([^:]*?)\s+:/; @nums= /(\d+)/g