foreach(sort keys %{$data{'Drive C'}}) {
    print "$_ = '$data{'Drive C'}{$_}'\n";
}