Subject: | First https request is very slow when perl process memory usage is high |
Date: | Tue, 20 Oct 2015 08:17:32 +0000 |
To: | "bug-Perl-Dist-Strawberry [...] rt.cpan.org" <bug-Perl-Dist-Strawberry [...] rt.cpan.org> |
From: | Jesper Jørgen Persson <jjp [...] siteimprove.com> |
In a perl script with a small memory usage the first https request takes 2 seconds:
-----------------------------------------------
use LWP::Simple qw($ua get);
my $t = time;
my $contents = get("https://www.google.com");
my $seconds_used = time-$t;
print "seconds_used: $seconds_used\n";
-----------------------------------------------
In this perl script the process uses 440 MB memory when the https request is done and the first https request takes 55 seconds:
-----------------------------------------------
use LWP::Simple qw($ua get);
my %large_hash = ();
my $string = 'a'x150;
foreach my $cnt(1..800000){
$large_hash{$string.$cnt} = $string.$cnt;
}
my $t = time;
my $contents = get("https://www.google.com");
my $seconds_used = time-$t;
print "seconds_used: $seconds_used\n";
-----------------------------------------------
Following https requests are not slow.
OS Name: Microsoft Windows 8.1 Pro
OS Version: 6.3.9600 N/A Build 9600
System Type: x64-based PC
Summary of my perl5 (revision 5 version 22 subversion 0) configuration:
Platform:
osname=MSWin32, osvers=6.3, archname=MSWin32-x64-multi-thread
uname='Win32 strawberry-perl 5.22.0.1 #1 Mon Jun 1 23:58:39 2015 x64'
Hope you can help resolve this problem.
Best regards
Jesper Persson