diff options
Diffstat (limited to 'tests/ftpserver.pl')
-rwxr-xr-x | tests/ftpserver.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl index b7dd6313c..c32165b62 100755 --- a/tests/ftpserver.pl +++ b/tests/ftpserver.pl @@ -1011,7 +1011,7 @@ sub STATUS_imap { logmsg "STATUS_imap got test $testno\n"; - $testno =~ s/^([^0-9]*)//; + $testno =~ s/[^0-9]//g; my $testpart = ""; if ($testno > 10000) { $testpart = $testno % 10000; @@ -1020,7 +1020,7 @@ sub STATUS_imap { loadtest("$srcdir/data/test$testno"); - @data = getpart("reply", "data$testpart"); + my @data = getpart("reply", "data$testpart"); for my $d (@data) { sendcontrol $d; |