Storable

概要

Storableを使用すると、配列／ハッシュ／オブジェクト等を含むデータを簡単にディスク等に格納／取得することができます。
この機能を利用して、私自身はStorableをよくシリアライザーとして使用しています。

使用方法

以下、Storableをシリアライザーとして使用し、さらにCrypt::CBCを使って暗号化文字列を作成、複合する方法を紹介します。

 use Storable qw(nfreeze thaw);
 use Data::Dumper;
 use Crypt::CBC;
 
 my $data = { title => 'テストテスト',
             description => "てすと\nてすと\nてすと",
           };
 
 my $fdata = nfreeze $data;
 my $ciphertext = $cbc->encrypt_hex($fdata);
 print "[$ciphertext]\n";
 
 my $plaintext  = $cbc->decrypt_hex($ciphertext);
 my $tdata = thaw $plaintext;
 print Dumper($tdata);