rewrite Data::Disk class