(while(print(regexp-replace #/(_.*)outgo/(read-line)"\\1incom")))