Report the correct size when 'verifiedserver' is requested.

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index f366bf439549a6728baf053402bf30313f6a811e..5bfe71cd03f48739926d492ef92b66e168ffea98 100644 (file)
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -282,7 +282,9 @@ sub RETR_command {
     if($testno =~ /^verifiedserver$/) {
         # this is the secret command that verifies that this actually is
         # the curl test server
-        print "150 Binary junk (10 bytes).\r\n";
+        my $response = "WE ROOLZ: $$\r\n";
+        my $len = length($response);
+        print "150 Binary junk ($len bytes).\r\n";
         print SOCK "WE ROOLZ: $$\r\n";
         close(SOCK);
         print "226 File transfer complete\r\n";