File::Storage::Stat - Storage manager of minimum size

  use File::Storage::Stat;

  my $fss = File::Storage::Stat->new({FilePath => 'filepath'});
  $fss->set(100, 1000);
  my($a, $b) = $fss->get;#max 4byte int.

  my $fss = File::Storage::Stat->new({FilePath => 'filepath', Type => 'char'});
  $fss->set('hoge', 'test');# max 4byte char.
  my($a, $b) = $fss->get;

small data is stored in atime and mtime of file.

set(data1, data2)

data is set. the data of less than 4byte can be preserved respectively.

get()

the preserved is loaded.

Kazuhiro Osawa <ko@yappo.ne.jp>

Copyright (C) 2005 by Kazuhiro Osawa

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.5 or, at your option, any later version of Perl 5 you may have available.