Perlメモ

@array = (1, 3, 5); # 配列
$ref = [1, 3, 5];    # 配列の参照
@array == @{$ref} == @$ref; # 全部等しい           
\@array と $ref は、値は同じ。
use Data::Dumper;
print Dumper( @array );

perl -d のxコマンド相当
  • データの永続化
use Storable;

store [\@array, $ref], 'test.db';
my ($arrayref1, $arrayref2) = retrieve('test.db');
print Dumper( @{$arrayref1} ); # デリファレンス
print Dumper( @{$arrayref2} ); # デリファレンス
  • 大きな整数

use bigint を使う。

# perl -Mbigint -e "print 2**64;"
18446744073709551616

# perl          -e "print 2**64;"
1.84467440737096e+019