my $crop = 1024;
my $margin = 64;
...
read($handle, $_, $crop + $margin);