Something

        my @cpu0;
        my %process = (
                cpu             => 0,
                tmstart         => 0,
                tmstop          => 0 
        );                          
          
        $process{cpu} = 0;
        push @cpu0, [ %process ];
        print $cpu0[0][0];