Lines Matching refs:data
46 my $data = 'x' x 500000;
47 print $ps "set /b/beeeg 0 0 500000\r\n$data\r\n";
52 is(scalar <$ps>, "$data\r\n", "got data portion back");
61 my $data = 'x' x 900000;
62 print $ps "set /b/chunked 0 0 900000\r\n$data\r\n";
67 is(scalar <$ps>, "$data\r\n", "got data portion back");
77 my $data = 'x' x 500000;
79 print $ps "set /b/$_ 0 0 500000\r\n$data\r\n";
83 print $ps "ms /b/$_ 500000 T30\r\n$data\r\n";
89 print $ps "ms BOOM 500000 T30\r\n$data\r\n";
92 mem_get_is($ps, "BOOM", $data);