diff --git a/blobserver/tester/bs-test.pl b/blobserver/tester/bs-test.pl
new file mode 100755
index 000000000..227a997f6
--- /dev/null
+++ b/blobserver/tester/bs-test.pl
@@ -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";