17
17
my $content = join "", 'a'..'j', 'k'..'t';
18
18
my $location = "$uri?STDIN";
19
my $expected = join "", 'a'..'j', "<samba>", 'k'..'t';
19
my $expected = join "", 'a'..'j', "package", 'k'..'t';
20
20
my $received = POST_BODY_ASSERT $location, content => $content;
21
21
ok t_cmp($expected, $received, "STDIN tests");