ftpserver: silence warnings

Fix regressions in commit b56e3d43e5. Make @data local and filter off
non-numerical digits from $testno in STATUS_imap.
This commit is contained in:
Daniel Stenberg 2013-04-29 14:58:08 +02:00
parent c3e6d69acb
commit 073e83b543
1 changed files with 2 additions and 2 deletions

View File

@ -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;