http://www.perlmonks.org?node_id=1223256


in reply to Get Text at position from many files (While/Unless)

I created several text files, some of them containing "Something", some of them not, and the code seems to work correctly. Can you show the SSCCE?

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord }map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,

Replies are listed 'Best First'.
Re^2: Get Text at position from many files (While/Unless)
by maikelnight (Acolyte) on Sep 28, 2018 at 20:46 UTC
    Stupid me, it was an beforehand mistake as i used >>/append to put stuff in my files. I realized that content was correct with multiple files at first start ;-) Sorry...