程式

my $aaa = {};  # 宣告為 HASH
$aaa->{'b'} = 3;   # 丟第一個值到 HASH
push @{$aaa->{'a'}} , 1;   # @{} push 進去成為 ARRAY
push @{$aaa->{'a'}} , 2;
use Data::Dumper;
print Dumper $aaa;

結果

$VAR1 = {
    'a' => [
                1,
                2
            ],
    'b' => 3
 };
Related posts 相關文章
2020 年迎來了 PHP 8 與 Perl 7
More...
安裝 perl 5.8.1 版本 – 草記
More...
perl 備註
More...
perl 隨機產生 password 密碼
More...

作者

留言

撰寫回覆或留言

發佈留言必須填寫的電子郵件地址不會公開。