Jim Gibson wrote on 7/29/2014 10:08 PM: > > On Jul 29, 2014, at 5:12 PM, ESChamp <esch...@gmail.com> wrote: > >> ESChamp wrote on 7/28/2014 6:59 PM: >> >> Let me backtrack and provide some background information. >> >> This script processes two files, recapfile, a plain text file, and copy, >> and HTML-formatted file. >> >> It reads copy into an array, and recapfile into another array. Then it >> writes a new array which contains all the initial lines of the recapfile >> array from the first line down to but not including the first line >> containing / RESULTS OF BOARD 1/ > > Most of that information is superfluous. You need to concentrate on the > precise problem that you are having.
Didn't I do that in the next section? >> And here is where it goes wrong ('No <pre> found') >> >> ($index) = grep $hfile[$_] eq '<pre>', 0 .. $#hfile; >> die 'No <pre> found' unless $index; >> >> I printed hfile using >> foreach (@hfile) { print "$_\n"; } >> >> and it looks fine! That is, there is a line with only <pre> on it!!! > > Perhaps the line containing ‘<pre>’ contains whitespace characters that you > cannot see when you print it. Good suggestion! I looked at the file with a hex editor and a set of characters like this 0D 0A 3C 70 72 65 3E 0D 0A so no invisible characters. > Or maybe <pre> occurs on the first line, in which case $index will have the > value 0, which is treated as false, and your program will die. <pre> is line 709. No other line is simply <pre> > This is all speculation because you have not provided us with your exact > program and data files. I was warned not to post a 3000 line data file and a 150 line program, but if you'd like me to send them to you off-line, I will. -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/