my ($addr,$state,$pc) = $line =~ /([^,]+),([^,]+),([^,]+)/;