diff options
author | Brad Fitzpatrick <brad@danga.com> | 2006-09-05 05:55:12 +0000 |
---|---|---|
committer | Brad Fitzpatrick <brad@danga.com> | 2006-09-05 05:55:12 +0000 |
commit | 61c41eeffc853ce38432ff46dc558909e46bca0a (patch) | |
tree | 28719b84192cc141a64c16f032358c91dc683bb7 /t/bogus-commands.t | |
parent | 4b329cd1361edf929d3f802bd3fb50ae2acf7073 (diff) | |
download | memcached-61c41eeffc853ce38432ff46dc558909e46bca0a.tar.gz |
rename 'test' to 't'.
git-svn-id: http://code.sixapart.com/svn/memcached/trunk/server@370 b0b603af-a30f-0410-a34e-baf09ae79d0b
Diffstat (limited to 't/bogus-commands.t')
-rwxr-xr-x | t/bogus-commands.t | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/t/bogus-commands.t b/t/bogus-commands.t new file mode 100755 index 0000000..aaae6cd --- /dev/null +++ b/t/bogus-commands.t @@ -0,0 +1,13 @@ +#!/usr/bin/perl + +use strict; +use Test::More tests => 1; +use FindBin qw($Bin); +use lib "$Bin/lib"; +use MemcachedTest; + +my $server = new_memcached(); +my $sock = $server->sock; + +print $sock "boguscommand slkdsldkfjsd\r\n"; +is(scalar <$sock>, "ERROR\r\n", "got error back"); |