http://www.perlmonks.org?node_id=1046658


in reply to Re: Byte ranges of binary files
in thread Byte ranges of binary files

The idea in my brain was that $myRange = the range of bytes required, and $readSz = the buffer size. But maybe that got lost in translation into Perl ?

Replies are listed 'Best First'.
Re^3: Byte ranges of binary files
by BrowserUk (Patriarch) on Jul 27, 2013 at 15:59 UTC

    You could try something like:

    use constant READSIZE => ...; my $fh = ...; my $start = ...; my $end = ...; ## check $end < -s($fh)! seek $fh, $start, 0; while( ($_ = tell( $fh ) ) < $end ) { local $/ = \min( READSIZE, $end - $_ ); my $chunk = <$fh> or die $!; ## ... }

    With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.