REBOL[]foreach[a b]read %/dev/fd/0[if b[prin b]prin a]