pre-warm-elb.pl ��f�U P�Bf�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.ama