Perl 中的哈希映射

Question

我正在使用 FRONTIER::CLIENT 模块在 Perl 中编写客户端 API。我试图在 Perl 中执行类似的操作：

HashMap<Integer, String> message = (HashMap<Integer, String>)client.execute("APIWrapper.login"); 
System.out.println(message.get(1000));

How do I Implement the same idea in Perl?

Answer 1

Hashmap 是原生 Perl 数据结构。任何用散列符号 % 声明的变量都是存储键值对的散列。请参阅有关 Perl 数据类型的文档。另请参阅 Perl 数据结构手册。

编辑

查看此示例

# This can be anything which returns pairs of strings
my %login_message = getData(); # ( 'key1' => 'value1', 'key2' => 'value2' ); 

for my $key ( keys %login_message ) { 
        print "key: $key, value: $login_message{$key}\n"; 
}

sub getData {
        return ( 'key1' => 'value1', 'key2' => 'value2' );
}

输出：

key: key2, value: value2
key: key1, value: value1

Answer 2

以下代码是在 Perl 中使用哈希的示例：

my %data = (
    red => 1,
    blue => 37,
    green => 99,
);

print $data{'red'}, "\n";