/* NetRexx */
options replace format comments java crossref savelog symbols nobinary
say
say 'Loops/Break'
rn = Rexx
rnd = Random()
loop label lb forever
rn = rnd.nextInt(19)
say rn.right(3)'\-'
if rn = 10 then leave lb
end lb