将Perl哈希写入磁盘以供Python读取

Question

如何以一种可以从Python读取的方式将Perl哈希写入文件？

例如：

#!/usr/bin/perl
my %h = (
   foo => 'bar',
   baz => ['a', 'b', 'c'],
   raz => {
       ABC => 123,
       XYZ => [4, 5, 6],
   }
);

dumpHash('/tmp/myhash', %h);

...和

#!/usr/bin/python
h = readHash('/tmp/myhash')
print h

# {
#  'foo': 'bar', 
#  'baz': ['a', 'b', 'c'],      
#  'raz': {
#          'ABC': 123, 
#          'XYZ': [4, 5, 6]
#         }
# }

我通常使用Perl的内置Storable来序列化哈希值。 我看到Python具有Storable阅读器 ，但它不是标准发行版的一部分。

有没有一种方法可以使用两种语言的标准内置程序来执行此操作。

Answer 1

我在初读您的问题时错过了“内置”要求，但我离题了。 JSON不是Perl内置的，因此您必须通过CPAN进行安装。 尽管如此，这可能是最有效且兼容的方法之一。

Perl：

use warnings;
use strict;

use JSON;

my $file = 'data.json';

my %h = (
   foo => 'bar',
   baz => ['a', 'b', 'c'],
   raz => {
       ABC => 123,
       XYZ => [4, 5, 6],
   }
);

my $json = encode_json \%h;

open my $fh, '>', $file or die $!;

print $fh $json;

close $fh or die $!;

蟒蛇：

import json

file = 'data.json';
data = json.loads(open(file).read())

print(data)