Lines Matching refs:be

34     my $be = $srv->accept();
35     $be->autoflush(1);
36     ok(defined $be, "mock backend created");
37     like(<$be>, qr/version/, "received version command");
38     print $be "VERSION 1.0.0-mock\r\n";
40     return $be;
72     my $be = accept_backend($msrv);
74     $s->add($be);
79         $be->close();
83         $be = accept_backend($msrv);
86     $be->close();
89     $be = accept_backend($msrv);
93     is(scalar <$be>, "mg baz\r\n", "backend does reconnect and still works");
94     print $be "HD\r\n";
104     my $oldbe = $be;
107     $be = accept_backend($msrv);
114         $be->close();
118         $be = accept_backend($msrv);
121     $be->close();
126     $be = accept_backend($msrv);
134     is(scalar <$be>, "mg baz\r\n", "backend does work");
135     print $be "HD\r\n";
142     $be->close();