{local $/ = "aaaa\n"; <FILE> } {local $/ = "%"; while( <FILE> ){ } } [download]
In reply to Re: Changing $/ mid-file by I0 in thread Changing $/ mid-file by jgallagher