perldoc -f getc