Re^2: how to get Perl hash in C#

OK,

When I try to run this:

    my $JSON  = JSON->new->utf8;
    $JSON->convert_blessed(1);
    $JSON->allow_blessed(1);
    $JSON->pretty(1);
    my $json = $JSON->encode(\%arr_hash);
    print "JSON [\n $json\n ]\n";
[download]

I only get the root level data and the rest are null!

 JSON [
 {
   "ace_context" : [
      null,
      null,
      null,
      null,
      null,
      null,
      null,
      null
   ],
   "server_nmap" : [
      null,
      null,
...
      null
   ]
}
[download]

Same thing happends when I try this:

    my $json = $JSON->encode(\@ace_context);
[download]

BUT when I run this:

print Dumper(\%arr_hash);
[download]

the output contains everything.

How the JSON code should look like in order to "export" everything to JSON-format data?

Comment on Re^2: how to get Perl hash in C# Select or Download Code

Replies are listed 'Best First'.
Re^3: how to get Perl hash in C# by tobyink (Canon) on Jan 24, 2014 at 14:12 UTC
What is this "everything" that appears in the Data::Dumper output? Is it stuff that would be nonsensical in JSON output? (e.g. coderefs, pointers to open file handles, etc) `use Moops; class Cow :rw { has name => (default => 'Ermintrude') }; say Cow->new->name`	[reply]
Re^4: how to get Perl hash in C# by Hossein (Acolyte) on Jan 27, 2014 at 08:02 UTC
Hi, Tha hash values are arrays. These arrays can contain some hash too. Below is the output from Data::Dumper. I need these values imported av hash/"collection" in C# $VAR1 = bless( { 'INTERFACE' => [ undef, 'vlanX' ], 'LOCATION' => 'X3', 'ACELOGICAL' => 'user', 'CHILD' => [ bless( { 'IPROUTE' => '0.0.0.0 0.0.0.0 x +xx.xxx.x.x.', 'NAME' => 'vlanX', 'ACE' => 'ACEx', 'CHILD' => [ bless( { 'IPROUTE' + => undef, 'NAME' => 'name', 'INTERFACE' => 'vlanX', 'ACE' => undef, 'SERVERFARM' => undef, 'CHILD' => [], 'OSID' => [], 'ALIAS' => undef, 'OBJECTID' => undef, 'PARENT' => [ $VAR1->{'CHILD'}[0] ], 'MASTERSHAPE' => 'ACE_RSERVER', 'CONTEXT' => 'Cntext', 'SHAPEID' => [], 'IPADDRESS' => 'xxx.xxx.x.xx' }, 'some value' ), 'IPROUTE' + => undef, 'NAME' => 'name', 'INTERFACE' => 'vlanX', 'ACE' => undef, 'SERVERFARM' => undef, 'CHILD' => [], 'OSID' => [], 'ALIAS' => undef, 'OBJECTID' => undef, 'PARENT' => [ $VAR1->{'CHILD'}[0] ], 'MASTERSHAPE' => 'ACE', 'CONTEXT' => 'some value ', 'SHAPEID' => [], 'IPADDRESS' => 'xxx.xxx.x.xx' }, 'some value' ), . . . [download]	[reply] [d/l]
Re^5: how to get Perl hash in C# by Corion (Patriarch) on Jan 27, 2014 at 08:10 UTC
JSON cannot transport "objects". What would C# do with Perl classes? You will need to convert your objects to plain hashes (or arrays) that contain the relevant data.	[reply]
Re^6: how to get Perl hash in C# by Hossein (Acolyte) on Jan 28, 2014 at 07:04 UTC