Lines Matching refs:data

99     my $data = 'x' x 2000000;
100     print $ps "set /b/toolarge 0 0 2000000\r\n$data\r\n";
103     print $ps "ms /b/toolarge 2000000 T30\r\n$data\r\n";
119     my $data = 'x' x 500000;
120     print $ps "set /b/beeeg 0 0 500000\r\n$data\r\n";
125     is(scalar <$ps>, "$data\r\n", "got data portion back");
134     my $data = 'x' x 900000;
135     print $ps "set /b/chunked 0 0 900000\r\n$data\r\n";
140     is(scalar <$ps>, "$data\r\n", "got data portion back");
149     my $data = 'x' x 1000;
150     print $ps "set /b/ext 0 0 1000\r\n$data\r\n";
156     is(scalar <$ps>, "$data\r\n", "got data from extstore");
163     my $data = 'x' x 500000;
165         print $ps "set /b/$_ 0 0 500000\r\n$data\r\n";
169         print $ps "ms /b/$_ 500000 T30\r\n$data\r\n";