pre-warm-elb.pl � d��U � ���U #!perl use strict; use warnings; use Parallel::ForkManager; use POSIX; use String::Random; my $c_start = 1; my $c_end = 64; my $interval = 10 * 60; my $delta = 1.25; my $user = 'ec2-user'; my @hosts = ('ec2-XXX-XXX-XXX-XXX.compute-1.amazonaws.com', 'ec2-XXX-XXX-XXX-XXX.compute-1.amazonaws.com'); my $nhosts = scalar @hosts; my $url = 'http://ELB-ADDESS.us-east-1.elb.am
![ELB Warm-up tool](https://cdn-ak-scissors.b.st-hatena.com/image/square/1ef26f6cb4349557952890dbe3e567f7f98dc151/height=288;version=1;width=512/https%3A%2F%2Fgithub.githubassets.com%2Fassets%2Fgist-og-image-54fd7dc0713e.png)