Hashmap in Perl

Question

In Schreiben einer Client-API in Perl mit FRONTIER :: CLIENT-Modul. Ich versuche, ähnlich wie folgt in Perl zu tun:

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

Wie implementiere ich die gleiche Idee in Perl?

Answer 1

Hashmaps sind eine native Perl-Datenstruktur. Jede Variable, die mit dem Hash-Symbol% ​​deklariert wird, ist ein Hash, der Schlüsselwertpaare speichert. Siehe diese Dokumentation unter Perl data types. Siehe auch die Perl Data Structures Cookbook.

bearbeiten

See this example

# 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'); 
} 

Ausgänge:

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

Answer 2

Der folgende Code ist ein Beispiel für einen Hash in Perl:

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

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