mirror of https://github.com/perkeep/perkeep.git
shell of unwritten blobstore tester script
This commit is contained in:
parent
0d9195a8ea
commit
f02a87a61a
|
@ -0,0 +1,23 @@
|
||||||
|
#!/usr/bin/perl
|
||||||
|
#
|
||||||
|
# Test script to run against a Camli blobserver to test its compliance
|
||||||
|
# with the spec.
|
||||||
|
|
||||||
|
use strict;
|
||||||
|
use Getopt::Long;
|
||||||
|
use LWP;
|
||||||
|
use Test::More;
|
||||||
|
|
||||||
|
my $user;
|
||||||
|
my $password;
|
||||||
|
GetOptions("user" => \$user,
|
||||||
|
"password" => \$password) or usage();
|
||||||
|
|
||||||
|
usage() unless @ARGV == 1;
|
||||||
|
my $hostport = shift;
|
||||||
|
|
||||||
|
sub usage {
|
||||||
|
die "Usage: bs-test.pl [--user= --password=] <host:port>\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
die "TODO: implement";
|
Loading…
Reference in New Issue