4 5use strict; 6use warnings; 7use Test::More tests => 19; 8use Fcntl qw(:DEFAULT :seek); 9 10use constant BLK => 512; 11use constant BLKS_PER_MB => 2048;
--- 80 unchanged lines hidden --- | 2 3use strict; 4use warnings; 5use Test::More tests => 19; 6use Fcntl qw(:DEFAULT :seek); 7 8use constant BLK => 512; 9use constant BLKS_PER_MB => 2048;
--- 80 unchanged lines hidden --- |