summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--t/50-integration.t26
-rw-r--r--t/in/1023kbin0 -> 1047552 bytes
-rw-r--r--t/in/1024kbin0 -> 1048576 bytes
-rw-r--r--t/in/1025kbin0 -> 1049600 bytes
-rw-r--r--t/in/1kbin0 -> 1024 bytes
-rw-r--r--t/in/41
-rw-r--r--t/in/4096kbin0 -> 4194304 bytes
7 files changed, 27 insertions, 0 deletions
diff --git a/t/50-integration.t b/t/50-integration.t
new file mode 100644
index 0000000..1219323
--- /dev/null
+++ b/t/50-integration.t
@@ -0,0 +1,26 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use 5.010;
+use autodie;
+
+use Cwd;
+use Test::Command tests => 6;
+
+my $hashl = '../../bin/hashl';
+
+my $EMPTY = q{};
+my $usage = <<'EOF';
+Usage: ../../bin/hashl [options] <update|list|info|...> [args]
+See 'perldoc -F ../../bin/hashl' (or 'man hashl' if it is properly installed)
+EOF
+
+chdir('t/in');
+
+for my $cmd ("$hashl", "$hashl copy") {
+ my $tc = Test::Command->new(cmd => $cmd);
+
+ $tc->exit_isnt_num(0);
+ $tc->stdout_is_eq($EMPTY);
+ $tc->stderr_is_eq($usage);
+}
diff --git a/t/in/1023k b/t/in/1023k
new file mode 100644
index 0000000..52cdbc8
--- /dev/null
+++ b/t/in/1023k
Binary files differ
diff --git a/t/in/1024k b/t/in/1024k
new file mode 100644
index 0000000..2315abf
--- /dev/null
+++ b/t/in/1024k
Binary files differ
diff --git a/t/in/1025k b/t/in/1025k
new file mode 100644
index 0000000..7bcdb6c
--- /dev/null
+++ b/t/in/1025k
Binary files differ
diff --git a/t/in/1k b/t/in/1k
new file mode 100644
index 0000000..24c24ec
--- /dev/null
+++ b/t/in/1k
Binary files differ
diff --git a/t/in/4 b/t/in/4
new file mode 100644
index 0000000..257cc56
--- /dev/null
+++ b/t/in/4
@@ -0,0 +1 @@
+foo
diff --git a/t/in/4096k b/t/in/4096k
new file mode 100644
index 0000000..59740d4
--- /dev/null
+++ b/t/in/4096k
Binary files differ