t/perf-nntpd.t | 2 +- diff --git a/t/perf-nntpd.t b/t/perf-nntpd.t index e5021532096e3ed53ae7cf123d6b554d3ce02285..f7890d1c3868d04bfee3f55224aeaa62f01d6bea 100644 --- a/t/perf-nntpd.t +++ b/t/perf-nntpd.t @@ -78,7 +78,7 @@ ); $s = IO::Socket::INET->new(%opts); $s->autoflush(1); my $buf = $s->getline; -is($buf, "201 server ready - post via email\r\n", 'got greeting'); +like($buf, qr/\A201 .* ready - post via email\r\n/s, 'got greeting'); my $t = timeit(10, sub { ok($s->print("GROUP $group\r\n"), 'changed group');