fix PerlIO::scalar get_cnt when the file position is beyond 2GB

This caused a new test to fail on 32-bit builds.