#iterate
while ( my $chunk = $reader->chunk )
{
    print "$chunk\n****************\n";
}

##</code><code>##

#iterate
while ( $reader->chunk )
{
    print "$_\n****************\n";
}