You could try Mmap or perhaps one of the Tie modules. Or, to completely avoid Perl I/O overhead, you could write an XS module and use your choice of system functions directly: read, mmap or whatever works best in your context.