projects
/
awesomized
/
libmemcached
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
|
github
history
|
raw
|
HEAD
Adding a copy of memcached to the tree.
[awesomized/libmemcached]
/
memcached
/
t
/
bogus-commands.t
1
#!/usr/bin/perl
2
3
use
strict
;
4
use
Test
::
More tests
=>
1
;
5
use
FindBin
qw(
$Bin
);
6
use lib "
$Bin
/lib";
7
use MemcachedTest;
8
9
my
$server
= new_memcached();
10
my
$sock
=
$server
->sock;
11
12
print
$sock
"boguscommand slkdsldkfjsd
\r\n
";
13
is(scalar <
$sock
>, "ERROR
\r\n
", "got error back");