Select Code to Download

$reader->open ("/path/to/file.txt");

...
{
    print "$chunk\n****************\n";
}

while ( my $chunk = $reader->chunk("/path/to/file.txt") )
{
    print "$chunk\n****************\n";
}

package ChunkReader;

...
    return $chunk;
}
1;