Help for this page
truncate('test.dat', 1024);
use strict; use warnings; ... print $handle $_; } close($handle);
my $crop = 1024; my $margin = 64; ... read($handle, $_, $crop + $margin);