r1526@llin: dpavlin | 2007-11-04 15:40:45 +0100

 rename script to more correct name

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@994 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/scripts/webpac-lookup-dump.pl b/scripts/webpac-lookup-dump.pl
deleted file mode 100755 (executable)
index a5e5e84..0000000
--- a/scripts/webpac-lookup-dump.pl
+++ /dev/null
@@ -1,12 +0,0 @@
-#!/usr/bin/perl -w
-
-# dump WebPAC lookups
-
-use strict;
-use Storable qw/retrieve/;
-use Data::Dump qw/dump/;
-
-my $path = shift @ARGV || die "usage: $0 /path/to/lookup\n";
-
-print dump( retrieve( $path ));
-

diff --git a/scripts/webpac-storable-dump.pl b/scripts/webpac-storable-dump.pl
new file mode 100755 (executable)
index 0000000..299748b
--- /dev/null
+++ b/scripts/webpac-storable-dump.pl
@@ -0,0 +1,12 @@
+#!/usr/bin/perl -w
+
+# dump WebPAC storable files
+
+use strict;
+use Storable qw/retrieve/;
+use Data::Dump qw/dump/;
+
+my $path = shift @ARGV || die "usage: $0 /path/to/lookup\n";
+
+print dump( retrieve( $path ));
+