1 2 3 4 5 6
if nul = $:.index("-") $:[nul..-1] = ["."] end if nul = $:.index("-") $:[nul..-1] = ["."] end