Re: A Question on a homebrew XML parser

The loop is exiting because of your test:

 CHAR: while($currSymbol = getc($fh)) {
[download]

The character 0 is false, and thus fails this test. You probably should use something like:

 CHAR: while( defined($currSymbol = getc($fh)) ) {
[download]

(If you were using <$fh> to read from the file this would not be a problem even if you read 0 only because perl special cases that to have an implict defined() around it.)

Comment on Re: A Question on a homebrew XML parser Select or Download Code


Perl: the Markov chain saw
	PerlMonks