($-,$=)=glob<>;H^substr$s.=<>,$--1,1and$_=$-,$--=$=while$---;print