Add ARM files
[dh-make-perl] / dev / arm / liburi-perl / liburi-perl-1.35.dfsg.1 / t / storable.t
diff --git a/dev/arm/liburi-perl/liburi-perl-1.35.dfsg.1/t/storable.t b/dev/arm/liburi-perl/liburi-perl-1.35.dfsg.1/t/storable.t
new file mode 100644 (file)
index 0000000..afe6837
--- /dev/null
@@ -0,0 +1,15 @@
+#!perl -w
+
+eval {
+    require Storable;
+    print "1..3\n";
+};
+if ($@) {
+    print "1..0 # skipped: Needs the Storable module installed\n";
+    exit;
+}
+
+system($^X, "-Iblib/lib", "t/storable-test.pl", "store");
+system($^X, "-Iblib/lib", "t/storable-test.pl", "retrieve");
+
+unlink('urls.sto');