summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaximilian Gass <mxey@ghosthacking.net>2009-07-07 19:03:38 +0200
committerMaximilian Gass <mxey@ghosthacking.net>2009-07-07 19:03:38 +0200
commit4c15ad8c37da423034ed70254b4a97f056236946 (patch)
treee19e98c7952c289ed39e36201cd9d1deec7a1de2
parent13c4672e117e91ce47250ce545b91e87a7146f4c (diff)
Ported to Storable
-rw-r--r--README1
-rwxr-xr-xbin/envstore6
-rw-r--r--prereqs1
3 files changed, 3 insertions, 5 deletions
diff --git a/README b/README
index e3fb8d9..ca56bc3 100644
--- a/README
+++ b/README
@@ -1,3 +1,2 @@
Requires:
- perl
- - Simplestore <https://derf.homelinux.org/~derf/projects/simplestore>
diff --git a/bin/envstore b/bin/envstore
index 973b61e..8a4ba1b 100755
--- a/bin/envstore
+++ b/bin/envstore
@@ -5,7 +5,7 @@
use strict;
use warnings;
use Pod::Usage;
-use Simplestore;
+use Storable;
my $store_file = "/tmp/envstore-$>";
my %store;
@@ -44,12 +44,12 @@ sub check_store {
sub load_store {
return unless check_store;
- %store = %{load($store_file) || {}};
+ %store = %{retrieve($store_file) || {}};
}
sub save_store {
umask(0077);
- save($store_file, \%store);
+ store(\%store, $store_file);
}
sub get_keyvalue {
diff --git a/prereqs b/prereqs
deleted file mode 100644
index d7afa60..0000000
--- a/prereqs
+++ /dev/null
@@ -1 +0,0 @@
-depend package simplestore