Help for this page
disk_stats[array_index]{key}=value
open (FILE, "> diskstats.perldata") or die "can't open diskstats: $!"; print FILE Data::Dumper->Dump([\@disk_stats]); close FILE or die "can't close diskxstats: $!";