$varbindhash{"OID_$i"} = $OIDs[$i];

##</code><code>##

#!/usr/bin/perl

use strict;
#use JSON;

my $alex = "alex";
my $alexAge = "35";
my $tristan = "tristan";
my $tristanAge = "5";
my $krista_bell = "kristabell";
my $krista_bellAge = "2";

my %newHash = ("$alex" => "$alexAge", "$tristan" => "$tristanAge", "$krista_bell" => "$krista_bellAge");

my @array = ('test_0_0', 'test_0_1', 'test_0_2');
my $arrayRef = \@array;

printf("\narray = @array, ArrayRef = $arrayRef, de-referenced arrayRef: @{$arrayRef}, de-referenced arrayRef2: @$arrayRef\n\n");


my @multiArray = (
        ['value_on_0_0', 'value_on_0_1', 'value_on_0_2'],
        ['value_on_1_0', 'value_on_1_1', 'value_on_1_2'],
        ['value_on_2_0', 'value_on_2_1', 'value_on_2_2']
);

my $multiArrayRef = \@multiArray;

printf("\nmultiArray = @multiArray, MultiArrayRef = $multiArrayRef, de-referenced multiArrayRef: @{$multiArrayRef}, de-referenced multiArrayRef2: @$multiArrayRef\n\n");

printf("\n\n");

my $i = 0;
my $c0 = 0;
my $c1 = 1;
my $c2 = 2;
foreach my $x (@multiArray)
{
        printf("\n\nX Ref: $x,\nX De-Ref: @$x,\nRow[$i] Column[$c0]: $x->[0], Row[$i] Column[$c1]: $x->[1], Row[$i] Column[$c2]: $x->[2]");
        printf("\nVariations on first value on row[$i]: x[0] = $x->[0] OR x[0] = @$x[0] OR x[0] = ${$x}[0]");
        my %varbind = (
        ("row" . "$i" . "c" . "$c0") => @$x[0],
        ("row" . "$i" . "c" . "$c1") => @$x[1],
        ("row" . "$i" . "c" . "$c2") => @$x[2]
        
        #("row" . "$i" . "c" . "$c0")  => $x->[0],
        #("row" . "$i" . "c" . "$c1") => $x->[1],
        #("row" . "$i" . "c" . "$c2") => $x->[2]
        );
        printf("\n\n Value of current varbind: ");
        print %varbind;
        push(@{$newHash{"varbinds"}}, {%varbind});
        $i++;
}

printf("\n\nNext line will be printout of newhash\n");
print %newHash;
printf("\n\n\n");

#printf("\nto_json(%newHash)");

##</code><code>##

array = test_0_0 test_0_1 test_0_2, ArrayRef = ARRAY(0x17dc7b8), de-referenced arrayRef: test_0_0 test_0_1 test_0_2, de-referenced arrayRef2: test_0_0 test_0_1 test_0_2


multiArray = ARRAY(0x153b088) ARRAY(0x153b688) ARRAY(0x17dce18), MultiArrayRef = ARRAY(0x17dca40), de-referenced multiArrayRef: ARRAY(0x153b088) ARRAY(0x153b688) ARRAY(0x17dce18), de-referenced multiArrayRef2: ARRAY(0x153b088) ARRAY(0x153b688) ARRAY(0x17dce18)


X Ref: ARRAY(0x153b088),
X De-Ref: value_on_0_0 value_on_0_1 value_on_0_2,
Row[0] Column[0]: value_on_0_0, Row[0] Column[1]: value_on_0_1, Row[0] Column[2]: value_on_0_2
Variations on first value on row[0]: x[0] = value_on_0_0 OR x[0] = value_on_0_0 OR x[0] = value_on_0_0

 Value of current varbind: row0c2value_on_0_2row0c1value_on_0_1row0c0value_on_0_0

X Ref: ARRAY(0x153b688),
X De-Ref: value_on_1_0 value_on_1_1 value_on_1_2,
Row[1] Column[0]: value_on_1_0, Row[1] Column[1]: value_on_1_1, Row[1] Column[2]: value_on_1_2
Variations on first value on row[1]: x[0] = value_on_1_0 OR x[0] = value_on_1_0 OR x[0] = value_on_1_0

 Value of current varbind: row1c2value_on_1_2row1c1value_on_1_1row1c0value_on_1_0

X Ref: ARRAY(0x17dce18),
X De-Ref: value_on_2_0 value_on_2_1 value_on_2_2,
Row[2] Column[0]: value_on_2_0, Row[2] Column[1]: value_on_2_1, Row[2] Column[2]: value_on_2_2
Variations on first value on row[2]: x[0] = value_on_2_0 OR x[0] = value_on_2_0 OR x[0] = value_on_2_0

 Value of current varbind: row2c0value_on_2_0row2c2value_on_2_2row2c1value_on_2_1

Next line will be printout of newhash
varbindsARRAY(0x15562a8)alex35tristan5kristabell2