2007å¹´10æ24æ¥20:00 ã«ãã´ãªLightweight Languages perl - é åãããã·ã¥ãã¼ã¨ãã¦æ±ã ã³ã¡ã³ãæ¬ã«ããæç§æ¸è§£ãããªãã£ãã®ã§ã Perlåå¼·ä¸ - Yoshioriã®Blog #!/usr/bin/perl use strict; use warnings; my @array = qw/1 2 3/; my @array2 = qw/1 2 3/; my %hash; $hash{@array} = 'foo'; # ã¡ãã£ã¨å¤æ´ print $hash{ @array2 }; # foo ã¿ãããªãã¨åºæ¥ãªãã®ããªï¼ æç§æ¸è§£ã¯ããã¡ãã $hash{ join($;, @array) } = 'foo'; ããã¯ã $hash{1,2,3} = 'foo'; $hash{qw/1 2 3/} = 'foo'; ã¨ãããé åãªãã©ã«ããã¼ã«
{{#tags}}- {{label}}
{{/tags}}