700{2{(%stdin)(r)file 1 string readstring pop}repeat print print}repeat