@c=split//,<>;s/#/shift@c/eg,print for<>