Permalink
Browse files

improve profiling and benchmarking

  • Loading branch information...
1 parent b8f8f75 commit 703d5826177657e756f67b7ef0121ebe1923e5ff @xsawyerx xsawyerx committed Sep 6, 2016
Showing with 3 additions and 1 deletion.
  1. +3 −1 tools/perf.pl
View
@@ -7,6 +7,8 @@
use HTTP::Request::Common;
use Dumbbench;
use Getopt::Long qw<:config no_ignore_case>;
+use HTTP::XSHeaders;
+use HTTP::XSCookies;
$ENV{'DANCER_ENVIRONMENT'} = 'production';
$ENV{'PLACK_ENV'} = 'production';
@@ -70,7 +72,7 @@ sub check_app {
$app2->({
REQUEST_METHOD => 'GET',
PATH_INFO => '/',
- });
+ }) for 1 .. 50;
DB::disable_profile();
DB::finish_profile();
} elsif ( $opts{'compare'} ) {

0 comments on commit 703d582

Please sign in to comment.