while($char = getc(SOURCE)){