# Now lets get 2.4 /proc/partitions and 2.5 /proc/diskstats for
# accurate disk measurements
if ( $minor >= 4 ) {
(
$dsk_stat_t[$r], $dsk_rio_t[$r], $dsk_rblk_t[$r],
$dsk_wio_t[$r], $dsk_wblk_t[$r]
)
= ( 0, 0, 0, 0 );
my $filename = 4 == $minor ? 'partitions' : 'diskstats';
open(F_DSKSTAT, "$PROC/$filename")
or warn "$0: cannot open '$PROC/$filename' for reading: $!\n";
$i = 0;
while ( $line = <F_DSKSTAT> ) {