diff --git a/bin/test/perftest2.pl b/bin/test/perftest2.pl
index d7911e96..62088276 100755
--- a/bin/test/perftest2.pl
+++ b/bin/test/perftest2.pl
@@ -1,7 +1,8 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 
 use lib '../../';
 use strict;
+use warnings;
 use Time::HiRes qw( usleep ualarm gettimeofday tv_interval );
 use PVE::INotify;
 use PVE::AccessControl;
@@ -12,6 +13,6 @@ my $hostname = PVE::INotify::read_file("hostname");
 # but we can simply create a ticket if we are root
 my $ticket = PVE::AccessControl::assemble_ticket('root@pam');
 
-my $cmd = "ab -c 2 -n 1000 -C 'PVEAuthCookie=$ticket'  https://$hostname:8006/api2/json";
+my $cmd = "ab -c 10 -n 1000 -C 'PVEAuthCookie=$ticket'  https://$hostname:8006/api2/json";
 print "$cmd\n";
 system($cmd) == 0 || die "command failed - $!\n";
diff --git a/bin/test/perftest3.pl b/bin/test/perftest3.pl
index f1f84b8a..e1ad61cd 100755
--- a/bin/test/perftest3.pl
+++ b/bin/test/perftest3.pl
@@ -1,7 +1,8 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 
 use lib '../../';
 use strict;
+use warnings;
 use Time::HiRes qw( usleep ualarm gettimeofday tv_interval );
 use PVE::INotify;
 use PVE::AccessControl;
@@ -15,7 +16,7 @@ my $hostname = PVE::INotify::read_file("hostname");
 # but we can simply create a ticket if we are root
 my $ticket = PVE::AccessControl::assemble_ticket('root@pam');
 
-my $wcount = 1;
+my $wcount = 10;
 my $qcount = 100;
 
 sub test_rpc {
@@ -65,6 +66,4 @@ sub run_tests {
     print "$host: $tpq ms per query\n";
 }
 
-# why is this faster than LWP::UserAgent?
-
-run_tests($hostname); # test 'apache'
+run_tests($hostname); # test 'pveproxy'