Lines Matching refs:store
24 use Storable qw(store retrieve store_fd nstore_fd fd_retrieve);
36 print "not " unless defined store(\@a, 'store');
42 $root = retrieve('store');
52 1 while unlink 'store';
65 print "not " unless $foo->store('store');
68 print "not " unless open(OUT, '>>store');
82 print "not " unless open(OUT, 'store');
114 END { 1 while unlink 'store' }