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